a Code for the Combination of Indirect and Direct Constraints on High Energy Physics Models Logo
unitarity.cpp
Go to the documentation of this file.
1 /*
2  * Copyright (C) 2015 HEPfit Collaboration
3  * All rights reserved.
4  *
5  * For the licensing terms see doc/COPYING.
6  */
7 
8 #include "unitarity.h"
9 #include "THDM.h"
10 #include "THDMcache.h"
11 
12 unitarity::unitarity(const StandardModel& SM_i)
13 : ThObservable(SM_i), myTHDM(static_cast<const THDM*> (&SM_i))
14 {}
15 
16 double unitarity::computeThValue()
17 {
18  return 0.0;
19 }
20 
21 unitarity1::unitarity1(const StandardModel& SM_i)
22 : unitarity(SM_i)
23 {}
24 
25 double unitarity1::computeThValue()
26 {
27  double mHl2=myTHDM->getmHl2();
28  double mA2=myTHDM->getmA2();
29  double mHh2=myTHDM->getmHh2();
30  double vev=myTHDM->v();
31  double sina=myTHDM->getsina();
32  double cosa=myTHDM->getcosa();
33  double tanb=myTHDM->gettanb();
34  double sinb=myTHDM->getsinb();
35  double cosb=myTHDM->getcosb();
36  double m12_2=myTHDM->getm12_2();
37 
38  return ((mHl2*cosa*cosa +mHh2*sina*sina -m12_2/tanb)/sinb/sinb
39  +(mHh2*cosa*cosa +mHl2*sina*sina - m12_2*tanb)/cosb/cosb
40  +sqrt(4.0*pow(mA2 -m12_2/(cosb*sinb),2)
41  +pow((mHl2/cosb/cosb -mHh2/sinb/sinb)*sina*sina
42  +(mHh2/cosb/cosb -mHl2/sinb/sinb)*cosa*cosa
43  +m12_2/tanb/sinb/sinb -m12_2*tanb/cosb/cosb,2)))/(2.0*vev*vev);
44 }
45 
46 unitarity2::unitarity2(const StandardModel& SM_i)
47 : unitarity(SM_i)
48 {}
49 
50 double unitarity2::computeThValue()
51 {
52  double mHl2=myTHDM->getmHl2();
53  double mA2=myTHDM->getmA2();
54  double mHh2=myTHDM->getmHh2();
55  double vev=myTHDM->v();
56  double sina=myTHDM->getsina();
57  double cosa=myTHDM->getcosa();
58  double tanb=myTHDM->gettanb();
59  double sinb=myTHDM->getsinb();
60  double cosb=myTHDM->getcosb();
61  double m12_2=myTHDM->getm12_2();
62 
63  return ((mHl2*cosa*cosa +mHh2*sina*sina -m12_2/tanb)/sinb/sinb
64  +(mHh2*cosa*cosa +mHl2*sina*sina - m12_2*tanb)/cosb/cosb
65  -sqrt(4.0*pow(mA2 -m12_2/(cosb*sinb),2)
66  +pow((mHl2/cosb/cosb -mHh2/sinb/sinb)*sina*sina
67  +(mHh2/cosb/cosb -mHl2/sinb/sinb)*cosa*cosa
68  +m12_2/tanb/sinb/sinb -m12_2*tanb/cosb/cosb,2)))/(2.0*vev*vev);
69 }
70 
71 unitarity3::unitarity3(const StandardModel& SM_i)
72 : unitarity(SM_i)
73 {}
74 
75 double unitarity3::computeThValue()
76 {
77  double mHl2=myTHDM->getmHl2();
78  double mA2=myTHDM->getmA2();
79  double mHh2=myTHDM->getmHh2();
80  double mHp2=myTHDM->getmHp2();
81  double vev=myTHDM->v();
82  double sina=myTHDM->getsina();
83  double cosa=myTHDM->getcosa();
84  double tanb=myTHDM->gettanb();
85  double sinb=myTHDM->getsinb();
86  double cosb=myTHDM->getcosb();
87  double m12_2=myTHDM->getm12_2();
88 
89  return ((mHl2*cosa*cosa +mHh2*sina*sina -m12_2/tanb)/sinb/sinb
90  +(mHh2*cosa*cosa +mHl2*sina*sina - m12_2*tanb)/cosb/cosb
91  +sqrt(4.0*pow(mA2 -2*mHp2 +m12_2/(cosb*sinb),2)
92  +pow((mHl2/cosb/cosb -mHh2/sinb/sinb)*sina*sina
93  +(mHh2/cosb/cosb -mHl2/sinb/sinb)*cosa*cosa
94  +m12_2/tanb/sinb/sinb -m12_2*tanb/cosb/cosb,2)))/(2.0*vev*vev);
95 }
96 
97 unitarity4::unitarity4(const StandardModel& SM_i)
98 : unitarity(SM_i)
99 {}
100 
101 double unitarity4::computeThValue()
102 {
103  double mHl2=myTHDM->getmHl2();
104  double mA2=myTHDM->getmA2();
105  double mHh2=myTHDM->getmHh2();
106  double mHp2=myTHDM->getmHp2();
107  double vev=myTHDM->v();
108  double sina=myTHDM->getsina();
109  double cosa=myTHDM->getcosa();
110  double tanb=myTHDM->gettanb();
111  double sinb=myTHDM->getsinb();
112  double cosb=myTHDM->getcosb();
113  double m12_2=myTHDM->getm12_2();
114 
115  return ((mHl2*cosa*cosa +mHh2*sina*sina -m12_2/tanb)/sinb/sinb
116  +(mHh2*cosa*cosa +mHl2*sina*sina - m12_2*tanb)/cosb/cosb
117  -sqrt(4.0*pow(mA2 -2*mHp2 +m12_2/(cosb*sinb),2)
118  +pow((mHl2/cosb/cosb -mHh2/sinb/sinb)*sina*sina
119  +(mHh2/cosb/cosb -mHl2/sinb/sinb)*cosa*cosa
120  +m12_2/tanb/sinb/sinb -m12_2*tanb/cosb/cosb,2)))/(2.0*vev*vev);
121 }
122 
123 unitarity5::unitarity5(const StandardModel& SM_i)
124 : unitarity(SM_i)
125 {}
126 
127 double unitarity5::computeThValue()
128 {
129  double mHl2=myTHDM->getmHl2();
130  double mA2=myTHDM->getmA2();
131  double mHh2=myTHDM->getmHh2();
132  double mHp2=myTHDM->getmHp2();
133  double vev=myTHDM->v();
134  double sina=myTHDM->getsina();
135  double cosa=myTHDM->getcosa();
136  double tanb=myTHDM->gettanb();
137  double sinb=myTHDM->getsinb();
138  double cosb=myTHDM->getcosb();
139  double m12_2=myTHDM->getm12_2();
140 
141  return (3.0*((mHh2/cosb/cosb +mHl2/sinb/sinb)*cosa*cosa
142  +(mHl2/cosb/cosb + mHh2/sinb/sinb)*sina*sina
143  -m12_2*(1.0/tanb/sinb/sinb + tanb/cosb/cosb))
144  +sqrt(4.0*pow(mA2 + 2.0*mHp2
145  -(m12_2 +2.0*(mHl2 - mHh2)*cosa*sina)/(cosb*sinb),2)
146  +(9.0*pow((mHl2 - mHh2)*(cosa*cosa - sina*sina)
147  +(mHl2 + mHh2 -(2.0*m12_2)/(cosb*sinb))
148  *(cosb*cosb - sinb*sinb),2))
149  /(4.0*pow(cosb,4)*pow(sinb,4))))/(2.0*vev*vev);
150 }
151 
152 unitarity6::unitarity6(const StandardModel& SM_i)
153 : unitarity(SM_i)
154 {}
155 
156 double unitarity6::computeThValue()
157 {
158  double mHl2=myTHDM->getmHl2();
159  double mA2=myTHDM->getmA2();
160  double mHh2=myTHDM->getmHh2();
161  double mHp2=myTHDM->getmHp2();
162  double vev=myTHDM->v();
163  double sina=myTHDM->getsina();
164  double cosa=myTHDM->getcosa();
165  double tanb=myTHDM->gettanb();
166  double sinb=myTHDM->getsinb();
167  double cosb=myTHDM->getcosb();
168  double m12_2=myTHDM->getm12_2();
169 
170  return (3.0*((mHh2/cosb/cosb +mHl2/sinb/sinb)*cosa*cosa
171  +(mHl2/cosb/cosb + mHh2/sinb/sinb)*sina*sina
172  -m12_2*(1.0/tanb/sinb/sinb + tanb/cosb/cosb))
173  -sqrt(4.0*pow(mA2 + 2.0*mHp2
174  -(m12_2 +2.0*(mHl2 - mHh2)*cosa*sina)/(cosb*sinb),2)
175  +(9.0*pow((mHl2 - mHh2)*(cosa*cosa - sina*sina)
176  +(mHl2 + mHh2 -(2.0*m12_2)/(cosb*sinb))
177  *(cosb*cosb - sinb*sinb),2))
178  /(4.0*pow(cosb,4)*pow(sinb,4))))/(2.0*vev*vev);
179 }
180 
181 unitarity7::unitarity7(const StandardModel& SM_i)
182 : unitarity(SM_i)
183 {}
184 
185 double unitarity7::computeThValue()
186 {
187  double mHl2=myTHDM->getmHl2();
188  double mA2=myTHDM->getmA2();
189  double mHh2=myTHDM->getmHh2();
190  double vev=myTHDM->v();
191  double sina=myTHDM->getsina();
192  double cosa=myTHDM->getcosa();
193  double sinb=myTHDM->getsinb();
194  double cosb=myTHDM->getcosb();
195 
196  return (mA2 +((mHh2-mHl2)*cosa*sina)/(cosb*sinb))/(vev*vev);
197 }
198 
199 unitarity8::unitarity8(const StandardModel& SM_i)
200 : unitarity(SM_i)
201 {}
202 
203 double unitarity8::computeThValue()
204 {
205  double mHl2=myTHDM->getmHl2();
206  double mA2=myTHDM->getmA2();
207  double mHh2=myTHDM->getmHh2();
208  double mHp2=myTHDM->getmHp2();
209  double vev=myTHDM->v();
210  double sina=myTHDM->getsina();
211  double cosa=myTHDM->getcosa();
212  double sinb=myTHDM->getsinb();
213  double cosb=myTHDM->getcosb();
214  double m12_2=myTHDM->getm12_2();
215 
216  return (-mA2 +4.0*mHp2
217  +((mHh2-mHl2)*cosa*sina -2.0*m12_2)/(cosb*sinb))/(vev*vev);
218 }
219 
220 unitarity9::unitarity9(const StandardModel& SM_i)
221 : unitarity(SM_i)
222 {}
223 
224 double unitarity9::computeThValue()
225 {
226  double mHl2=myTHDM->getmHl2();
227  double mA2=myTHDM->getmA2();
228  double mHh2=myTHDM->getmHh2();
229  double mHp2=myTHDM->getmHp2();
230  double vev=myTHDM->v();
231  double sina=myTHDM->getsina();
232  double cosa=myTHDM->getcosa();
233  double sinb=myTHDM->getsinb();
234  double cosb=myTHDM->getcosb();
235 
236  return (-mA2 +2.0*mHp2
237  +((mHh2-mHl2)*cosa*sina)/(cosb*sinb))/(vev*vev);
238 }
239 
240 unitarity10::unitarity10(const StandardModel& SM_i)
241 : unitarity(SM_i)
242 {}
243 
244 double unitarity10::computeThValue()
245 {
246  double mHl2=myTHDM->getmHl2();
247  double mA2=myTHDM->getmA2();
248  double mHh2=myTHDM->getmHh2();
249  double mHp2=myTHDM->getmHp2();
250  double vev=myTHDM->v();
251  double sina=myTHDM->getsina();
252  double cosa=myTHDM->getcosa();
253  double sinb=myTHDM->getsinb();
254  double cosb=myTHDM->getcosb();
255  double m12_2=myTHDM->getm12_2();
256 
257  return (mA2 +2.0*mHp2
258  +((mHh2-mHl2)*cosa*sina -2.0*m12_2)/(cosb*sinb))/(vev*vev);
259 }
260 
261 unitarity11::unitarity11(const StandardModel& SM_i)
262 : unitarity(SM_i)
263 {}
264 
265 double unitarity11::computeThValue()
266 {
267  double mHl2=myTHDM->getmHl2();
268  double mA2=myTHDM->getmA2();
269  double mHh2=myTHDM->getmHh2();
270  double mHp2=myTHDM->getmHp2();
271  double vev=myTHDM->v();
272  double sina=myTHDM->getsina();
273  double cosa=myTHDM->getcosa();
274  double sinb=myTHDM->getsinb();
275  double cosb=myTHDM->getcosb();
276  double m12_2=myTHDM->getm12_2();
277 
278  return (-mA2 -2.0*mHp2
279  +((mHh2-mHl2)*cosa*sina +4.0*m12_2)/(cosb*sinb))/(vev*vev);
280 }
281 
282 unitarity12::unitarity12(const StandardModel& SM_i)
283 : unitarity(SM_i)
284 {}
285 
286 double unitarity12::computeThValue()
287 {
288  double mHl2=myTHDM->getmHl2();
289  double mA2=myTHDM->getmA2();
290  double mHh2=myTHDM->getmHh2();
291  double mHp2=myTHDM->getmHp2();
292  double vev=myTHDM->v();
293  double sina=myTHDM->getsina();
294  double cosa=myTHDM->getcosa();
295  double sinb=myTHDM->getsinb();
296  double cosb=myTHDM->getcosb();
297  double m12_2=myTHDM->getm12_2();
298 
299  return (5.0*mA2 -2.0*mHp2
300  +((mHh2-mHl2)*cosa*sina -2.0*m12_2)/(cosb*sinb))/(vev*vev);
301 }
302 
303 unitarityNLO1::unitarityNLO1(const StandardModel& SM_i)
304 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
305 {}
306 
307 double unitarityNLO1::computeThValue()
308 {
309  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
310  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
311  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
312  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
313  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
314  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
315  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
316 
317  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
318  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
319  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
320 
321  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
322  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
323  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
324  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
325 
326  return (uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d - gslpp::complex::i()/2.0).abs();
327 }
328 
329 unitarityNLO2::unitarityNLO2(const StandardModel& SM_i)
330 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
331 {}
332 
333 double unitarityNLO2::computeThValue()
334 {
335  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
336  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
337  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
338  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
339  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
340  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
341  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
342  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
343  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
344 
345  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
346  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
347  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
348 
349  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
350  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
351  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
352  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
353 
354  return (uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d - gslpp::complex::i()/2.0).abs();
355 }
356 
357 unitarityNLO3::unitarityNLO3(const StandardModel& SM_i)
358 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
359 {}
360 
361 double unitarityNLO3::computeThValue()
362 {
363  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
364  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
365  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
366  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
367  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
368  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
369  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
370  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
371  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
372  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
373  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
374 
375  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
376  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
377  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
378  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
379  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
380  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
381 
382  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
383  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
384  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
385  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
386 
387  return (uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d - gslpp::complex::i()/2.0).abs();
388 }
389 
390 unitarityNLO4::unitarityNLO4(const StandardModel& SM_i)
391 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
392 {}
393 
394 double unitarityNLO4::computeThValue()
395 {
396  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
397  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
398  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
399  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
400  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
401  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
402  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
403  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
404  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
405  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
406  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
407 
408  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
409  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
410  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
411  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
412  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
413  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
414 
415  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
416  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
417  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
418  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
419 
420  return (uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d - gslpp::complex::i()/2.0).abs();
421 }
422 
423 unitarityNLO5::unitarityNLO5(const StandardModel& SM_i)
424 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
425 {}
426 
427 double unitarityNLO5::computeThValue()
428 {
429  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
430  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
431  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
432  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
433  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
434  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
435  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
436  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
437  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
438  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
439  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
440 
441  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
442  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
443  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
444 
445  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
446  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
447  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
448  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
449 
450  return (uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d - gslpp::complex::i()/2.0).abs();
451 }
452 
453 unitarityNLO6::unitarityNLO6(const StandardModel& SM_i)
454 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
455 {}
456 
457 double unitarityNLO6::computeThValue()
458 {
459  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
460  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
461  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
462  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
463  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
464  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
465  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
466 
467  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
468  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
469  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
470 
471  double uniNLO6a = -la1Q/(16.0*M_PI);
472  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
473  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
474  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
475 
476  return (uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d - gslpp::complex::i()/2.0).abs();
477 }
478 
479 unitarityNLO7::unitarityNLO7(const StandardModel& SM_i)
480 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
481 {}
482 
483 double unitarityNLO7::computeThValue()
484 {
485  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
486  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
487  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
488  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
489  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
490  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
491  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
492  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
493  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
494 
495  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
496  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
497  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
498 
499  double uniNLO7a = -la2Q/(16.0*M_PI);
500  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
501  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
502  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
503 
504  return (uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d - gslpp::complex::i()/2.0).abs();
505 }
506 
507 unitarityNLO8::unitarityNLO8(const StandardModel& SM_i)
508 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
509 {}
510 
511 double unitarityNLO8::computeThValue()
512 {
513  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
514  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
515  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
516  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
517  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
518  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
519  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
520  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
521  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
522  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
523  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
524 
525  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
526  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
527  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
528 
529  double uniNLO8a = -la4Q/(16.0*M_PI);
530  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
531  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
532  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
533 
534  return (uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d - gslpp::complex::i()/2.0).abs();
535 }
536 
537 unitarityNLO9::unitarityNLO9(const StandardModel& SM_i)
538 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
539 {}
540 
541 double unitarityNLO9::computeThValue()
542 {
543  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
544  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
545  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
546  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
547  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
548  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
549  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
550  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
551  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
552  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
553  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
554 
555  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
556  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
557  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
558 
559  double uniNLO9a = -la4Q/(16.0*M_PI);
560  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
561  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
562  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
563 
564  return (uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d - gslpp::complex::i()/2.0).abs();
565 }
566 
567 unitarityNLO10::unitarityNLO10(const StandardModel& SM_i)
568 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
569 {}
570 
571 double unitarityNLO10::computeThValue()
572 {
573  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
574  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
575  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
576  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
577  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
578  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
579  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
580  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
581  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
582  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
583  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
584 
585  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
586  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
587  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
588 
589  double uniNLO10a = -la3Q/(16.0*M_PI);
590  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
591  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
592  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
593 
594  return (uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d - gslpp::complex::i()/2.0).abs();
595 }
596 
597 unitarityNLO11::unitarityNLO11(const StandardModel& SM_i)
598 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
599 {}
600 
601 double unitarityNLO11::computeThValue()
602 {
603  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
604  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
605  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
606  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
607  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
608  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
609  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
610  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
611  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
612  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
613  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
614 
615  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
616  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
617  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
618 
619  double uniNLO11a = -la5Q/(16.0*M_PI);
620  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
621  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
622  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
623 
624  return (uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d - gslpp::complex::i()/2.0).abs();
625 }
626 
627 unitarityNLO12::unitarityNLO12(const StandardModel& SM_i)
628 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
629 {}
630 
631 double unitarityNLO12::computeThValue()
632 {
633  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
634  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
635  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
636  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
637  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
638  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
639  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
640  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
641  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
642  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
643  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
644 
645  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
646  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
647  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
648 
649  double uniNLO12a = -la3Q/(16.0*M_PI);
650  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
651  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
652  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
653 
654  return (uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d - gslpp::complex::i()/2.0).abs();
655 }
656 
657 unitarityNLO13::unitarityNLO13(const StandardModel& SM_i)
658 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
659 {}
660 
661 double unitarityNLO13::computeThValue()
662 {
663  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
664  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
665  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
666  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
667  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
668  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
669  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
670  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
671  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
672  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
673  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
674 
675  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
676  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
677  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
678 
679  double uniNLO13a = -la5Q/(16.0*M_PI);
680  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
681  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
682  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
683 
684  return (uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d - gslpp::complex::i()/2.0).abs();
685 }
686 
687 unitarityNLO14::unitarityNLO14(const StandardModel& SM_i)
688 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
689 {}
690 
691 double unitarityNLO14::computeThValue()
692 {
693  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
694  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
695  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
696  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
697  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
698  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
699  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
700  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
701  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
702  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
703  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
704 
705  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
706  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
707  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
708  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
709  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
710  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
711 
712  double uniNLO14a = -(la3Q-la4Q)/(16.0*M_PI);
713  double uniNLO14b = 3.0*(betalambda3-betalambda4)/(256.0*M_PI*M_PI*M_PI);
714  gslpp::complex uniNLO14c = (gslpp::complex::i()*M_PI-1.0)*(la3Q-la4Q)*(la3Q-la4Q)/(256.0*M_PI*M_PI*M_PI);
715  gslpp::complex uniNLO14d = -(la3Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
716 
717  return (uniNLO14a+uniNLO14b+uniNLO14c+uniNLO14d - gslpp::complex::i()/2.0).abs();
718 }
719 
720 unitarityNLO15::unitarityNLO15(const StandardModel& SM_i)
721 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
722 {}
723 
724 double unitarityNLO15::computeThValue()
725 {
726  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
727  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
728  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
729  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
730  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
731  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
732  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
733  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
734  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
735  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
736 
737  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
738  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
739  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
740 
741  double uniNLO15a = -la1Q/(16.0*M_PI);
742  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
743  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
744  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
745 
746  return (uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d - gslpp::complex::i()/2.0).abs();
747 }
748 
749 unitarityNLO16::unitarityNLO16(const StandardModel& SM_i)
750 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
751 {}
752 
753 double unitarityNLO16::computeThValue()
754 {
755  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
756  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
757  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
758  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
759  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
760  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
761  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
762  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
763  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
764  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
765  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
766 
767  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
768  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
769  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
770 
771  double uniNLO16a = -la2Q/(16.0*M_PI);
772  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
773  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
774  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
775 
776  return (uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d - gslpp::complex::i()/2.0).abs();
777 }
778 
779 unitarityNLO17::unitarityNLO17(const StandardModel& SM_i)
780 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
781 {}
782 
783 double unitarityNLO17::computeThValue()
784 {
785  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
786  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
787  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
788  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
789  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
790  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
791  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
792  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
793  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
794  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
795  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
796 
797  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
798  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
799  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
800 
801  double uniNLO17a = -la5Q/(16.0*M_PI);
802  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
803  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
804  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
805 
806  return (uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d - gslpp::complex::i()/2.0).abs();
807 }
808 
809 unitarityNLO18::unitarityNLO18(const StandardModel& SM_i)
810 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
811 {}
812 
813 double unitarityNLO18::computeThValue()
814 {
815  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
816  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
817  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
818  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
819  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
820  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
821  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
822 
823  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
824  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
825  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
826 
827  double uniNLO18a = -la1Q/(16.0*M_PI);
828  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
829  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
830  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
831 
832  return (uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d - gslpp::complex::i()/2.0).abs();
833 }
834 
835 unitarityNLO19::unitarityNLO19(const StandardModel& SM_i)
836 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
837 {}
838 
839 double unitarityNLO19::computeThValue()
840 {
841  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
842  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
843  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
844  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
845  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
846  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
847  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
848  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
849  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
850 
851  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
852  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
853  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
854 
855  double uniNLO19a = -la2Q/(16.0*M_PI);
856  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
857  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
858  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
859 
860  return (uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d - gslpp::complex::i()/2.0).abs();
861 }
862 
863 unitarityNLO20::unitarityNLO20(const StandardModel& SM_i)
864 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
865 {}
866 
867 double unitarityNLO20::computeThValue()
868 {
869  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
870  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
871  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
872  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
873  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
874  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
875  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
876  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
877  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
878  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
879  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
880 
881  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
882  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
883  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
884 
885  double uniNLO20a = -la5Q/(16.0*M_PI);
886  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
887  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
888  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
889 
890  return (uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d - gslpp::complex::i()/2.0).abs();
891 }
892 
893 unitarityNLO21::unitarityNLO21(const StandardModel& SM_i)
894 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
895 {}
896 
897 double unitarityNLO21::computeThValue()
898 {
899  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
900  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
901  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
902  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
903  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
904  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
905  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
906  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
907  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
908  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
909 
910  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
911  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
912  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
913 
914  double uniNLO21a = -la1Q/(16.0*M_PI);
915  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
916  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
917  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
918 
919  return (uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d - gslpp::complex::i()/2.0).abs();
920 }
921 
922 unitarityNLO22::unitarityNLO22(const StandardModel& SM_i)
923 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
924 {}
925 
926 double unitarityNLO22::computeThValue()
927 {
928  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
929  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
930  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
931  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
932  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
933  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
934  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
935  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
936  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
937  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
938  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
939 
940  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
941  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
942  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
943 
944  double uniNLO22a = -la2Q/(16.0*M_PI);
945  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
946  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
947  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
948 
949  return (uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d - gslpp::complex::i()/2.0).abs();
950 }
951 
952 unitarityNLO23::unitarityNLO23(const StandardModel& SM_i)
953 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
954 {}
955 
956 double unitarityNLO23::computeThValue()
957 {
958  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
959  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
960  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
961  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
962  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
963  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
964  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
965  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
966  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
967  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
968  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
969  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
970 
971  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
972  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
973  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
974 
975  double uniNLO23a = -la5Q/(16.0*M_PI);
976  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
977  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
978  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
979 
980  return (uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d - gslpp::complex::i()/2.0).abs();
981 }
982 
983 unitarityNLO24::unitarityNLO24(const StandardModel& SM_i)
984 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
985 {}
986 
987 double unitarityNLO24::computeThValue()
988 {
989  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
990  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
991  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
992  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
993  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
994  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
995  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
996  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
997  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
998  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
999  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1000 
1001  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1002  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1003  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1004  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1005  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1006  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1007 
1008  double uniNLO24a = -(la3Q+la4Q)/(16.0*M_PI);
1009  double uniNLO24b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
1010  gslpp::complex uniNLO24c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
1011  gslpp::complex uniNLO24d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc4;
1012 
1013  return (uniNLO24a+uniNLO24b+uniNLO24c+uniNLO24d - gslpp::complex::i()/2.0).abs();
1014 }
1015 
1016 unitarityNLO25::unitarityNLO25(const StandardModel& SM_i)
1017 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1018 {}
1019 
1020 double unitarityNLO25::computeThValue()
1021 {
1022  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1023  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1024  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1025  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1026  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1027  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1028  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1029  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1030  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1031  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1032  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1033 
1034  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1035  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1036  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1037  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1038  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1039  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1040 
1041  double uniNLO25a = -(la3Q+la4Q)/(16.0*M_PI);
1042  double uniNLO25b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
1043  gslpp::complex uniNLO25c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
1044  gslpp::complex uniNLO25d = -(la3Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1045 
1046  return (uniNLO25a+uniNLO25b+uniNLO25c+uniNLO25d - gslpp::complex::i()/2.0).abs();
1047 }
1048 
1049 unitarityNLO26::unitarityNLO26(const StandardModel& SM_i)
1050 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1051 {}
1052 
1053 double unitarityNLO26::computeThValue()
1054 {
1055  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1056  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1057  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1058  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1059  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1060  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1061  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1062  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1063  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1064  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1065  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1066  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1067 
1068  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1069  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1070  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1071  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1072  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1073  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1074 
1075  double uniNLO26a = -(la3Q+la4Q)/(16.0*M_PI);
1076  double uniNLO26b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
1077  gslpp::complex uniNLO26c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
1078  gslpp::complex uniNLO26d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
1079 
1080  return (uniNLO26a+uniNLO26b+uniNLO26c+uniNLO26d - gslpp::complex::i()/2.0).abs();
1081 }
1082 
1083 // Eigenvalues:
1084 
1085 unitarityNLOev1::unitarityNLOev1(const StandardModel& SM_i)
1086 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1087 {}
1088 
1089 double unitarityNLOev1::computeThValue()
1090 {
1091  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1092  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1093  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1094  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1095  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1096  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1097  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1098  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1099  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1100  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1101  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1102  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1103 
1104  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1105  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1106  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1107  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1108  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1109  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1110  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1111  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1112  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1113  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1114  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1115  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1116 
1117  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
1118  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1119  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
1120  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1121 
1122  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
1123  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1124  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
1125  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1126 
1127  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
1128  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
1129  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
1130  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1131 
1132  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
1133  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
1134  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
1135 
1136  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1137 }
1138 
1139 unitarityNLOev2::unitarityNLOev2(const StandardModel& SM_i)
1140 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1141 {}
1142 
1143 double unitarityNLOev2::computeThValue()
1144 {
1145  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1146  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1147  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1148  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1149  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1150  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1151  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1152  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1153  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1154  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1155  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1156  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1157 
1158  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1159  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1160  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1161  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1162  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1163  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1164  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1165  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1166  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1167  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1168  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1169  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1170 
1171  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
1172  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1173  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
1174  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1175 
1176  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
1177  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1178  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
1179  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1180 
1181  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
1182  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
1183  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
1184  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1185 
1186  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
1187  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
1188  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
1189 
1190  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1191 }
1192 
1193 unitarityNLOev3::unitarityNLOev3(const StandardModel& SM_i)
1194 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1195 {}
1196 
1197 double unitarityNLOev3::computeThValue()
1198 {
1199  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1200  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1201  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1202  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1203  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1204  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1205  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1206  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1207  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1208  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1209  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1210 
1211  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1212  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1213  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1214  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1215  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1216  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1217  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1218  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1219  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1220 
1221  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
1222  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
1223  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1224  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1225 
1226  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
1227  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1228  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
1229  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1230 
1231  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
1232  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
1233 
1234  return (uniA+uniC - 0.5*gslpp::complex::i()).abs();
1235 }
1236 
1237 unitarityNLOev4::unitarityNLOev4(const StandardModel& SM_i)
1238 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1239 {}
1240 
1241 double unitarityNLOev4::computeThValue()
1242 {
1243  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1244  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1245  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1246  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1247  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1248  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1249  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1250  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1251  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1252  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1253  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1254 
1255  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1256  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1257  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1258  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1259  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1260  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1261  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1262  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1263  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1264 
1265  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
1266  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
1267  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1268  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1269 
1270  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
1271  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1272  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
1273  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1274 
1275  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
1276  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
1277 
1278  return (uniA-uniC - 0.5*gslpp::complex::i()).abs();
1279 }
1280 
1281 unitarityNLOev5::unitarityNLOev5(const StandardModel& SM_i)
1282 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1283 {}
1284 
1285 double unitarityNLOev5::computeThValue()
1286 {
1287  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1288  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1289  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1290  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1291  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1292  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1293  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1294  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1295  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1296  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1297  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1298  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1299 
1300  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1301  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1302  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1303  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1304  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1305  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1306  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1307  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1308  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1309 
1310  double uniNLO6a = -la1Q/(16.0*M_PI);
1311  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1312  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1313  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1314 
1315  double uniNLO7a = -la2Q/(16.0*M_PI);
1316  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1317  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1318  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1319 
1320  double uniNLO8a = -la4Q/(16.0*M_PI);
1321  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
1322  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
1323  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1324 
1325  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
1326  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
1327  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
1328 
1329  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1330 }
1331 
1332 unitarityNLOev6::unitarityNLOev6(const StandardModel& SM_i)
1333 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1334 {}
1335 
1336 double unitarityNLOev6::computeThValue()
1337 {
1338  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1339  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1340  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1341  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1342  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1343  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1344  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1345  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1346  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1347  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1348  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1349  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1350 
1351  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1352  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1353  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1354  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1355  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1356  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1357  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1358  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1359  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1360 
1361  double uniNLO6a = -la1Q/(16.0*M_PI);
1362  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1363  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1364  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1365 
1366  double uniNLO7a = -la2Q/(16.0*M_PI);
1367  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1368  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1369  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1370 
1371  double uniNLO8a = -la4Q/(16.0*M_PI);
1372  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
1373  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
1374  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1375 
1376  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
1377  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
1378  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
1379 
1380  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1381 }
1382 
1383 unitarityNLOev7::unitarityNLOev7(const StandardModel& SM_i)
1384 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1385 {}
1386 
1387 double unitarityNLOev7::computeThValue()
1388 {
1389  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1390  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1391  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1392  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1393  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1394  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1395  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1396  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1397  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1398  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1399  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1400  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1401 
1402  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1403  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1404  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1405  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1406  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1407  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1408  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1409  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1410  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1411 
1412  double uniNLO6a = -la1Q/(16.0*M_PI);
1413  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1414  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1415  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1416 
1417  double uniNLO7a = -la2Q/(16.0*M_PI);
1418  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1419  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1420  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1421 
1422  double uniNLO9a = -la4Q/(16.0*M_PI);
1423  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
1424  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
1425  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1426 
1427  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
1428  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
1429  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
1430 
1431  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1432 }
1433 
1434 unitarityNLOev8::unitarityNLOev8(const StandardModel& SM_i)
1435 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1436 {}
1437 
1438 double unitarityNLOev8::computeThValue()
1439 {
1440  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1441  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1442  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1443  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1444  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1445  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1446  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1447  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1448  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1449  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1450  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1451  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1452 
1453  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1454  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1455  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1456  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1457  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1458  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1459  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1460  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1461  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1462 
1463  double uniNLO6a = -la1Q/(16.0*M_PI);
1464  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1465  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1466  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1467 
1468  double uniNLO7a = -la2Q/(16.0*M_PI);
1469  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1470  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
1471  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1472 
1473  double uniNLO9a = -la4Q/(16.0*M_PI);
1474  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
1475  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
1476  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1477 
1478  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
1479  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
1480  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
1481 
1482  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1483 }
1484 
1485 unitarityNLOev9::unitarityNLOev9(const StandardModel& SM_i)
1486 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1487 {}
1488 
1489 double unitarityNLOev9::computeThValue()
1490 {
1491  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1492  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1493  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1494  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1495  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1496  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1497  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1498  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1499  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1500  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1501  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1502 
1503  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1504  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1505  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1506  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1507  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1508  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1509 
1510  double uniNLO10a = -la3Q/(16.0*M_PI);
1511  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
1512  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1513  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1514 
1515  double uniNLO11a = -la5Q/(16.0*M_PI);
1516  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1517  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
1518  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1519 
1520  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
1521  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
1522 
1523  return (uniA+uniC - 0.5*gslpp::complex::i()).abs();
1524 }
1525 
1526 unitarityNLOev10::unitarityNLOev10(const StandardModel& SM_i)
1527 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1528 {}
1529 
1530 double unitarityNLOev10::computeThValue()
1531 {
1532  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1533  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1534  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1535  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1536  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1537  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1538  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1539  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1540  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1541  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1542  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1543 
1544  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1545  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1546  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1547  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1548  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1549  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1550 
1551  double uniNLO10a = -la3Q/(16.0*M_PI);
1552  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
1553  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1554  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1555 
1556  double uniNLO11a = -la5Q/(16.0*M_PI);
1557  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1558  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
1559  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1560 
1561  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
1562  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
1563 
1564  return (uniA-uniC - 0.5*gslpp::complex::i()).abs();
1565 }
1566 
1567 unitarityNLOev11::unitarityNLOev11(const StandardModel& SM_i)
1568 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1569 {}
1570 
1571 double unitarityNLOev11::computeThValue()
1572 {
1573  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1574  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1575  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1576  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1577  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1578  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1579  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1580  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1581  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1582  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1583  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1584  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1585 
1586  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1587  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1588  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1589  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1590  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1591  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1592 
1593  double uniNLO12a = -la3Q/(16.0*M_PI);
1594  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
1595  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1596  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
1597 
1598  double uniNLO13a = -la5Q/(16.0*M_PI);
1599  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1600  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
1601  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1602 
1603  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
1604  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
1605 
1606  return (uniA+uniC - 0.5*gslpp::complex::i()).abs();
1607 }
1608 
1609 unitarityNLOev12::unitarityNLOev12(const StandardModel& SM_i)
1610 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1611 {}
1612 
1613 double unitarityNLOev12::computeThValue()
1614 {
1615  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1616  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1617  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1618  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1619  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1620  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1621  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1622  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1623  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1624  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1625  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1626  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1627 
1628  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1629  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1630  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1631  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1632  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1633  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1634 
1635  double uniNLO12a = -la3Q/(16.0*M_PI);
1636  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
1637  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1638  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
1639 
1640  double uniNLO13a = -la5Q/(16.0*M_PI);
1641  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1642  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
1643  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1644 
1645  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
1646  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
1647 
1648  return (uniA-uniC - 0.5*gslpp::complex::i()).abs();
1649 }
1650 
1651 unitarityNLOev13::unitarityNLOev13(const StandardModel& SM_i)
1652 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1653 {}
1654 
1655 double unitarityNLOev13::computeThValue()
1656 {
1657  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1658  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1659  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1660  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1661  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1662  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1663  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1664  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1665  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1666  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1667  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1668  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1669  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1670  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1671 
1672  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1673  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1674  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1675  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1676  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1677  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1678  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1679  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1680  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1681 
1682  double uniNLO15a = -la1Q/(16.0*M_PI);
1683  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1684  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1685  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
1686 
1687  double uniNLO16a = -la2Q/(16.0*M_PI);
1688  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1689  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1690  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
1691 
1692  double uniNLO17a = -la5Q/(16.0*M_PI);
1693  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1694  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1695  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
1696 
1697  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
1698  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
1699  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
1700 
1701  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1702 }
1703 
1704 unitarityNLOev14::unitarityNLOev14(const StandardModel& SM_i)
1705 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1706 {}
1707 
1708 double unitarityNLOev14::computeThValue()
1709 {
1710  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1711  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1712  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1713  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1714  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1715  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1716  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1717  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1718  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1719  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1720  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1721  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1722  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1723  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1724 
1725  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1726  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1727  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1728  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1729  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1730  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1731  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1732  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1733  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1734 
1735  double uniNLO15a = -la1Q/(16.0*M_PI);
1736  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1737  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1738  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
1739 
1740  double uniNLO16a = -la2Q/(16.0*M_PI);
1741  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1742  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1743  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
1744 
1745  double uniNLO17a = -la5Q/(16.0*M_PI);
1746  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1747  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1748  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
1749 
1750  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
1751  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
1752  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
1753 
1754  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1755 }
1756 
1757 unitarityNLOev15::unitarityNLOev15(const StandardModel& SM_i)
1758 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1759 {}
1760 
1761 double unitarityNLOev15::computeThValue()
1762 {
1763  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1764  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1765  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1766  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1767  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1768  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1769  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1770  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1771  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1772  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1773  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1774  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1775 
1776  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1777  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1778  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1779  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1780  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1781  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1782  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1783  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1784  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1785 
1786  double uniNLO18a = -la1Q/(16.0*M_PI);
1787  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1788  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1789  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1790 
1791  double uniNLO19a = -la2Q/(16.0*M_PI);
1792  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1793  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1794  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1795 
1796  double uniNLO20a = -la5Q/(16.0*M_PI);
1797  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1798  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1799  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1800 
1801  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
1802  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
1803  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
1804 
1805  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1806 }
1807 
1808 unitarityNLOev16::unitarityNLOev16(const StandardModel& SM_i)
1809 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1810 {}
1811 
1812 double unitarityNLOev16::computeThValue()
1813 {
1814  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1815  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1816  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1817  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1818  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1819  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1820  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1821  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1822  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1823  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1824  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1825  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1826 
1827  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1828  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1829  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1830  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1831  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1832  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1833  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1834  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1835  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1836 
1837  double uniNLO18a = -la1Q/(16.0*M_PI);
1838  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1839  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1840  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
1841 
1842  double uniNLO19a = -la2Q/(16.0*M_PI);
1843  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1844  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1845  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
1846 
1847  double uniNLO20a = -la5Q/(16.0*M_PI);
1848  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1849  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1850  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
1851 
1852  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
1853  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
1854  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
1855 
1856  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1857 }
1858 
1859 unitarityNLOev17::unitarityNLOev17(const StandardModel& SM_i)
1860 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1861 {}
1862 
1863 double unitarityNLOev17::computeThValue()
1864 {
1865  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1866  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1867  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1868  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1869  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1870  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1871  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1872  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1873  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1874  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1875  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1876  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1877  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1878  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1879 
1880  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1881  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1882  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1883  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1884  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1885  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1886  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1887  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1888  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1889 
1890  double uniNLO21a = -la1Q/(16.0*M_PI);
1891  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1892  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1893  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
1894 
1895  double uniNLO22a = -la2Q/(16.0*M_PI);
1896  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1897  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1898  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
1899 
1900  double uniNLO23a = -la5Q/(16.0*M_PI);
1901  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1902  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1903  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
1904 
1905  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
1906  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
1907  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
1908 
1909  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1910 }
1911 
1912 unitarityNLOev18::unitarityNLOev18(const StandardModel& SM_i)
1913 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1914 {}
1915 
1916 double unitarityNLOev18::computeThValue()
1917 {
1918  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1919  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1920  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1921  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1922  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1923  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1924  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1925  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1926  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1927  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1928  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1929  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1930  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
1931  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
1932 
1933  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1934  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1935  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1936  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1937  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1938  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1939  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
1940  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
1941  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1942 
1943  double uniNLO21a = -la1Q/(16.0*M_PI);
1944  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
1945  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1946  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
1947 
1948  double uniNLO22a = -la2Q/(16.0*M_PI);
1949  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
1950  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
1951  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
1952 
1953  double uniNLO23a = -la5Q/(16.0*M_PI);
1954  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
1955  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
1956  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
1957 
1958  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
1959  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
1960  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
1961 
1962  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC)) - 0.5*gslpp::complex::i()).abs();
1963 }
1964 
1965 // Rp ratios:
1966 
1967 unitarityRp1::unitarityRp1(const StandardModel& SM_i)
1968 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
1969 {}
1970 
1971 double unitarityRp1::computeThValue()
1972 {
1973  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
1974  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
1975  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
1976  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
1977  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
1978  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
1979  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
1980  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
1981  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
1982  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
1983  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
1984  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
1985  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
1986 
1987  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1988  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
1989  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
1990  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
1991  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
1992  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
1993  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
1994  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
1995  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
1996  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
1997  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
1998  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
1999 
2000  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
2001  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2002  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
2003  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2004 
2005  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
2006  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2007  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
2008  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2009 
2010  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
2011  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
2012  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
2013  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2014 
2015  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
2016  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
2017  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
2018 
2019  double Rp=0.01;
2020  double a0LO = uniNLO1a+uniNLO2a+sqrt((uniNLO1a-uniNLO2a)*(uniNLO1a-uniNLO2a)+4.0*uniNLO3a*uniNLO3a);
2021  if(fabs(a0LO)>Rpeps)
2022  {
2023  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2024  }
2025 
2026  return Rp;
2027 }
2028 
2029 unitarityRp2::unitarityRp2(const StandardModel& SM_i)
2030 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2031 {}
2032 
2033 double unitarityRp2::computeThValue()
2034 {
2035  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2036  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2037  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2038  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2039  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2040  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2041  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2042  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2043  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2044  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2045  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2046  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2047  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2048 
2049  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2050  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2051  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2052  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2053  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2054  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2055  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2056  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2057  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2058  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2059  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2060  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2061 
2062  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
2063  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2064  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
2065  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2066 
2067  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
2068  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2069  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
2070  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2071 
2072  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
2073  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
2074  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
2075  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2076 
2077  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
2078  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
2079  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
2080 
2081  double Rp=0.01;
2082  double a0LO = uniNLO1a+uniNLO2a-sqrt((uniNLO1a-uniNLO2a)*(uniNLO1a-uniNLO2a)+4.0*uniNLO3a*uniNLO3a);
2083  if(fabs(a0LO)>Rpeps)
2084  {
2085  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2086  }
2087 
2088  return Rp;
2089 }
2090 
2091 unitarityRp3::unitarityRp3(const StandardModel& SM_i)
2092 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2093 {}
2094 
2095 double unitarityRp3::computeThValue()
2096 {
2097  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2098  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2099  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2100  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2101  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2102  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2103  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2104  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2105  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2106  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2107  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2108  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2109 
2110  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2111  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2112  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2113  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2114  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2115  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2116  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2117  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2118  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2119 
2120  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
2121  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
2122  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2123  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2124 
2125  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
2126  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2127  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
2128  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2129 
2130  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
2131  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
2132 
2133  double Rp=0.01;
2134  double a0LO = uniNLO4a+uniNLO5a;
2135  if(fabs(a0LO)>Rpeps)
2136  {
2137  Rp = ((uniA+uniC)-a0LO).abs()/fabs(a0LO);
2138  }
2139 
2140  return Rp;
2141 }
2142 
2143 unitarityRp4::unitarityRp4(const StandardModel& SM_i)
2144 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2145 {}
2146 
2147 double unitarityRp4::computeThValue()
2148 {
2149  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2150  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2151  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2152  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2153  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2154  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2155  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2156  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2157  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2158  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2159  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2160  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2161 
2162  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2163  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2164  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2165  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2166  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2167  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2168  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2169  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2170  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2171 
2172  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
2173  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
2174  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2175  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2176 
2177  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
2178  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2179  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
2180  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2181 
2182  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
2183  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
2184 
2185  double Rp=0.01;
2186  double a0LO = uniNLO4a-uniNLO5a;
2187  if(fabs(a0LO)>Rpeps)
2188  {
2189  Rp = ((uniA-uniC)-a0LO).abs()/fabs(a0LO);
2190  }
2191 
2192  return Rp;
2193 }
2194 
2195 unitarityRp5::unitarityRp5(const StandardModel& SM_i)
2196 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2197 {}
2198 
2199 double unitarityRp5::computeThValue()
2200 {
2201  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2202  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2203  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2204  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2205  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2206  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2207  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2208  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2209  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2210  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2211  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2212  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2213  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2214 
2215  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2216  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2217  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2218  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2219  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2220  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2221  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2222  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2223  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2224 
2225  double uniNLO6a = -la1Q/(16.0*M_PI);
2226  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2227  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2228  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2229 
2230  double uniNLO7a = -la2Q/(16.0*M_PI);
2231  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2232  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2233  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2234 
2235  double uniNLO8a = -la4Q/(16.0*M_PI);
2236  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
2237  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
2238  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2239 
2240  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
2241  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
2242  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
2243 
2244  double Rp=0.01;
2245  double a0LO = uniNLO6a+uniNLO7a+sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO8a*uniNLO8a);
2246  if(fabs(a0LO)>Rpeps)
2247  {
2248  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2249  }
2250 
2251  return Rp;
2252 }
2253 
2254 unitarityRp6::unitarityRp6(const StandardModel& SM_i)
2255 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2256 {}
2257 
2258 double unitarityRp6::computeThValue()
2259 {
2260  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2261  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2262  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2263  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2264  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2265  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2266  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2267  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2268  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2269  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2270  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2271  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2272  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2273 
2274  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2275  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2276  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2277  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2278  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2279  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2280  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2281  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2282  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2283 
2284  double uniNLO6a = -la1Q/(16.0*M_PI);
2285  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2286  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2287  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2288 
2289  double uniNLO7a = -la2Q/(16.0*M_PI);
2290  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2291  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2292  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2293 
2294  double uniNLO8a = -la4Q/(16.0*M_PI);
2295  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
2296  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
2297  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2298 
2299  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
2300  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
2301  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
2302 
2303  double Rp=0.01;
2304  double a0LO = uniNLO6a+uniNLO7a-sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO8a*uniNLO8a);
2305  if(fabs(a0LO)>Rpeps)
2306  {
2307  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2308  }
2309 
2310  return Rp;
2311 }
2312 
2313 unitarityRp7::unitarityRp7(const StandardModel& SM_i)
2314 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2315 {}
2316 
2317 double unitarityRp7::computeThValue()
2318 {
2319  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2320  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2321  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2322  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2323  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2324  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2325  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2326  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2327  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2328  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2329  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2330  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2331  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2332 
2333  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2334  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2335  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2336  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2337  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2338  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2339  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2340  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2341  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2342 
2343  double uniNLO6a = -la1Q/(16.0*M_PI);
2344  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2345  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2346  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2347 
2348  double uniNLO7a = -la2Q/(16.0*M_PI);
2349  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2350  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2351  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2352 
2353  double uniNLO9a = -la4Q/(16.0*M_PI);
2354  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
2355  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
2356  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2357 
2358  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
2359  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
2360  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
2361 
2362  double Rp=0.01;
2363  double a0LO = uniNLO6a+uniNLO7a+sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO9a*uniNLO9a);
2364  if(fabs(a0LO)>Rpeps)
2365  {
2366  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2367  }
2368 
2369  return Rp;
2370 }
2371 
2372 unitarityRp8::unitarityRp8(const StandardModel& SM_i)
2373 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2374 {}
2375 
2376 double unitarityRp8::computeThValue()
2377 {
2378  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2379  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2380  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2381  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2382  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2383  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2384  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2385  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2386  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2387  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2388  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2389  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2390  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2391 
2392  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2393  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2394  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2395  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2396  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2397  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2398  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
2399  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
2400  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
2401 
2402  double uniNLO6a = -la1Q/(16.0*M_PI);
2403  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2404  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2405  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2406 
2407  double uniNLO7a = -la2Q/(16.0*M_PI);
2408  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2409  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
2410  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2411 
2412  double uniNLO9a = -la4Q/(16.0*M_PI);
2413  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
2414  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
2415  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2416 
2417  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
2418  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
2419  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
2420 
2421  double Rp=0.01;
2422  double a0LO = uniNLO6a+uniNLO7a-sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO9a*uniNLO9a);
2423  if(fabs(a0LO)>Rpeps)
2424  {
2425  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2426  }
2427 
2428  return Rp;
2429 }
2430 
2431 unitarityRp9::unitarityRp9(const StandardModel& SM_i)
2432 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2433 {}
2434 
2435 double unitarityRp9::computeThValue()
2436 {
2437  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2438  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2439  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2440  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2441  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2442  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2443  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2444  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2445  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2446  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2447  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2448  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2449 
2450  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2451  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2452  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2453  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2454  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2455  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2456 
2457  double uniNLO10a = -la3Q/(16.0*M_PI);
2458  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
2459  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2460  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2461 
2462  double uniNLO11a = -la5Q/(16.0*M_PI);
2463  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2464  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
2465  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2466 
2467  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
2468  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
2469 
2470  double Rp=0.01;
2471  double a0LO = uniNLO10a+uniNLO11a;
2472  if(fabs(a0LO)>Rpeps)
2473  {
2474  Rp = ((uniA+uniC)-a0LO).abs()/fabs(a0LO);
2475  }
2476 
2477  return Rp;
2478 }
2479 
2480 unitarityRp10::unitarityRp10(const StandardModel& SM_i)
2481 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2482 {}
2483 
2484 double unitarityRp10::computeThValue()
2485 {
2486  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2487  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2488  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2489  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2490  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2491  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2492  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2493  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2494  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2495  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2496  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2497  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2498 
2499  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2500  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2501  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2502  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2503  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2504  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2505 
2506  double uniNLO10a = -la3Q/(16.0*M_PI);
2507  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
2508  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2509  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2510 
2511  double uniNLO11a = -la5Q/(16.0*M_PI);
2512  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2513  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
2514  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2515 
2516  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
2517  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
2518 
2519  double Rp=0.01;
2520  double a0LO = uniNLO10a-uniNLO11a;
2521  if(fabs(a0LO)>Rpeps)
2522  {
2523  Rp = ((uniA-uniC)-a0LO).abs()/fabs(a0LO);
2524  }
2525 
2526  return Rp;
2527 }
2528 
2529 unitarityRp11::unitarityRp11(const StandardModel& SM_i)
2530 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2531 {}
2532 
2533 double unitarityRp11::computeThValue()
2534 {
2535  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2536  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2537  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2538  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2539  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2540  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2541  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2542  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2543  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2544  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2545  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2546  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2547  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2548 
2549  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2550  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2551  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2552  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2553  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2554  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2555 
2556  double uniNLO12a = -la3Q/(16.0*M_PI);
2557  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
2558  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2559  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
2560 
2561  double uniNLO13a = -la5Q/(16.0*M_PI);
2562  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2563  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
2564  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2565 
2566  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
2567  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
2568 
2569  double Rp=0.01;
2570  double a0LO = uniNLO12a+uniNLO13a;
2571  if(fabs(a0LO)>Rpeps)
2572  {
2573  Rp = ((uniA+uniC)-a0LO).abs()/fabs(a0LO);
2574  }
2575 
2576  return Rp;
2577 }
2578 
2579 unitarityRp12::unitarityRp12(const StandardModel& SM_i)
2580 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2581 {}
2582 
2583 double unitarityRp12::computeThValue()
2584 {
2585  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2586  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2587  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2588  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2589  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2590  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2591  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2592  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2593  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2594  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2595  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2596  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2597  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2598 
2599  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
2600  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
2601  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2602  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2603  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2604  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2605 
2606  double uniNLO12a = -la3Q/(16.0*M_PI);
2607  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
2608  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2609  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
2610 
2611  double uniNLO13a = -la5Q/(16.0*M_PI);
2612  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2613  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
2614  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2615 
2616  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
2617  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
2618 
2619  double Rp=0.01;
2620  double a0LO = uniNLO12a-uniNLO13a;
2621  if(fabs(a0LO)>Rpeps)
2622  {
2623  Rp = ((uniA-uniC)-a0LO).abs()/fabs(a0LO);
2624  }
2625 
2626  return Rp;
2627 }
2628 
2629 unitarityRp13::unitarityRp13(const StandardModel& SM_i)
2630 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2631 {}
2632 
2633 double unitarityRp13::computeThValue()
2634 {
2635  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2636  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2637  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2638  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2639  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2640  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2641  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2642  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2643  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2644  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2645  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2646  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2647  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2648  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
2649  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2650 
2651  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2652  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2653  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2654  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2655  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2656  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2657  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2658  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2659  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2660 
2661  double uniNLO15a = -la1Q/(16.0*M_PI);
2662  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2663  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2664  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
2665 
2666  double uniNLO16a = -la2Q/(16.0*M_PI);
2667  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2668  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2669  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
2670 
2671  double uniNLO17a = -la5Q/(16.0*M_PI);
2672  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2673  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2674  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
2675 
2676  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
2677  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
2678  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
2679 
2680  double Rp=0.01;
2681  double a0LO = uniNLO15a+uniNLO16a+sqrt((uniNLO15a-uniNLO16a)*(uniNLO15a-uniNLO16a)+4.0*uniNLO17a*uniNLO17a);
2682  if(fabs(a0LO)>Rpeps)
2683  {
2684  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2685  }
2686 
2687  return Rp;
2688 }
2689 
2690 unitarityRp14::unitarityRp14(const StandardModel& SM_i)
2691 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2692 {}
2693 
2694 double unitarityRp14::computeThValue()
2695 {
2696  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2697  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2698  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2699  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2700  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2701  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2702  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2703  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2704  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2705  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2706  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2707  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2708  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2709  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
2710  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2711 
2712  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2713  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2714  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2715  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2716  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2717  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2718  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2719  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2720  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2721 
2722  double uniNLO15a = -la1Q/(16.0*M_PI);
2723  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2724  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2725  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
2726 
2727  double uniNLO16a = -la2Q/(16.0*M_PI);
2728  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2729  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2730  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
2731 
2732  double uniNLO17a = -la5Q/(16.0*M_PI);
2733  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2734  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2735  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
2736 
2737  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
2738  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
2739  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
2740 
2741  double Rp=0.01;
2742  double a0LO = uniNLO15a+uniNLO16a-sqrt((uniNLO15a-uniNLO16a)*(uniNLO15a-uniNLO16a)+4.0*uniNLO17a*uniNLO17a);
2743  if(fabs(a0LO)>Rpeps)
2744  {
2745  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2746  }
2747 
2748  return Rp;
2749 }
2750 
2751 unitarityRp15::unitarityRp15(const StandardModel& SM_i)
2752 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2753 {}
2754 
2755 double unitarityRp15::computeThValue()
2756 {
2757  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2758  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2759  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2760  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2761  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2762  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2763  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2764  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2765  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2766  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2767  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2768  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2769  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2770 
2771  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2772  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2773  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2774  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2775  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2776  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2777  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2778  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2779  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2780 
2781  double uniNLO18a = -la1Q/(16.0*M_PI);
2782  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2783  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2784  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2785 
2786  double uniNLO19a = -la2Q/(16.0*M_PI);
2787  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2788  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2789  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2790 
2791  double uniNLO20a = -la5Q/(16.0*M_PI);
2792  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2793  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2794  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2795 
2796  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
2797  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
2798  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
2799 
2800  double Rp=0.01;
2801  double a0LO = uniNLO18a+uniNLO19a+sqrt((uniNLO18a-uniNLO19a)*(uniNLO18a-uniNLO19a)+4.0*uniNLO20a*uniNLO20a);
2802  if(fabs(a0LO)>Rpeps)
2803  {
2804  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2805  }
2806 
2807  return Rp;
2808 }
2809 
2810 unitarityRp16::unitarityRp16(const StandardModel& SM_i)
2811 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2812 {}
2813 
2814 double unitarityRp16::computeThValue()
2815 {
2816  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2817  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2818  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2819  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2820  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2821  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2822  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2823  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2824  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2825  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2826  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2827  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2828  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2829 
2830  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2831  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2832  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2833  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2834  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2835  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2836  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2837  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2838  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2839 
2840  double uniNLO18a = -la1Q/(16.0*M_PI);
2841  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2842  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2843  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
2844 
2845  double uniNLO19a = -la2Q/(16.0*M_PI);
2846  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2847  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2848  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
2849 
2850  double uniNLO20a = -la5Q/(16.0*M_PI);
2851  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2852  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2853  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
2854 
2855  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
2856  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
2857  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
2858 
2859  double Rp=0.01;
2860  double a0LO = uniNLO18a+uniNLO19a-sqrt((uniNLO18a-uniNLO19a)*(uniNLO18a-uniNLO19a)+4.0*uniNLO20a*uniNLO20a);
2861  if(fabs(a0LO)>Rpeps)
2862  {
2863  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2864  }
2865 
2866  return Rp;
2867 }
2868 
2869 unitarityRp17::unitarityRp17(const StandardModel& SM_i)
2870 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2871 {}
2872 
2873 double unitarityRp17::computeThValue()
2874 {
2875  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2876  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2877  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2878  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2879  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2880  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2881  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2882  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2883  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2884  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2885  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2886  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2887  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2888  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
2889  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2890 
2891  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2892  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2893  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2894  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2895  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2896  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2897  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2898  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2899  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2900 
2901  double uniNLO21a = -la1Q/(16.0*M_PI);
2902  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2903  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2904  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
2905 
2906  double uniNLO22a = -la2Q/(16.0*M_PI);
2907  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2908  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2909  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
2910 
2911  double uniNLO23a = -la5Q/(16.0*M_PI);
2912  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2913  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2914  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
2915 
2916  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
2917  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
2918  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
2919 
2920  double Rp=0.01;
2921  double a0LO = uniNLO21a+uniNLO22a+sqrt((uniNLO21a-uniNLO22a)*(uniNLO21a-uniNLO22a)+4.0*uniNLO23a*uniNLO23a);
2922  if(fabs(a0LO)>Rpeps)
2923  {
2924  Rp = ((uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2925  }
2926 
2927  return Rp;
2928 }
2929 
2930 unitarityRp18::unitarityRp18(const StandardModel& SM_i)
2931 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2932 {}
2933 
2934 double unitarityRp18::computeThValue()
2935 {
2936  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2937  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2938  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
2939  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
2940  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
2941  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
2942  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
2943  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
2944  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
2945  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
2946  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
2947  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
2948  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
2949  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
2950  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
2951 
2952  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2953  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
2954  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
2955  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
2956  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
2957  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
2958  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
2959  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
2960  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
2961 
2962  double uniNLO21a = -la1Q/(16.0*M_PI);
2963  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
2964  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2965  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
2966 
2967  double uniNLO22a = -la2Q/(16.0*M_PI);
2968  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
2969  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
2970  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
2971 
2972  double uniNLO23a = -la5Q/(16.0*M_PI);
2973  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
2974  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
2975  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
2976 
2977  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
2978  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
2979  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
2980 
2981  double Rp=0.01;
2982  double a0LO = uniNLO21a+uniNLO22a-sqrt((uniNLO21a-uniNLO22a)*(uniNLO21a-uniNLO22a)+4.0*uniNLO23a*uniNLO23a);
2983  if(fabs(a0LO)>Rpeps)
2984  {
2985  Rp = ((uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))-a0LO).abs()/fabs(a0LO);
2986  }
2987 
2988  return Rp;
2989 }
2990 
2991 unitarityRp19::unitarityRp19(const StandardModel& SM_i)
2992 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
2993 {}
2994 
2995 double unitarityRp19::computeThValue()
2996 {
2997  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
2998  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
2999  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3000  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3001  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3002  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3003  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3004  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3005  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3006  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3007  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3008  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3009 
3010  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3011  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3012  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3013  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3014  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3015  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3016 
3017  double uniNLO14a = -(la3Q-la4Q)/(16.0*M_PI);
3018  double uniNLO14b = 3.0*(betalambda3-betalambda4)/(256.0*M_PI*M_PI*M_PI);
3019  gslpp::complex uniNLO14c = (gslpp::complex::i()*M_PI-1.0)*(la3Q-la4Q)*(la3Q-la4Q)/(256.0*M_PI*M_PI*M_PI);
3020  gslpp::complex uniNLO14d = -(la3Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3021 
3022  double Rp=0.01;
3023  if(fabs(uniNLO14a)>Rpeps)
3024  {
3025  Rp = (uniNLO14b+uniNLO14c+uniNLO14d).abs()/fabs(uniNLO14a);
3026  }
3027 
3028  return Rp;
3029 }
3030 
3031 unitarityRp20::unitarityRp20(const StandardModel& SM_i)
3032 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3033 {}
3034 
3035 double unitarityRp20::computeThValue()
3036 {
3037  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3038  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3039  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3040  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3041  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3042  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3043  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3044  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3045  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3046  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3047  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
3048  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3049 
3050  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3051  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3052  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3053  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3054  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3055  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3056 
3057  double uniNLO24a = -(la3Q+la4Q)/(16.0*M_PI);
3058  double uniNLO24b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
3059  gslpp::complex uniNLO24c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
3060  gslpp::complex uniNLO24d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc4;
3061 
3062  double Rp=0.01;
3063  if(fabs(uniNLO24a)>Rpeps)
3064  {
3065  Rp = (uniNLO24b+uniNLO24c+uniNLO24d).abs()/fabs(uniNLO24a);
3066  }
3067 
3068  return Rp;
3069 }
3070 
3071 // R ratios:
3072 
3073 unitarityR1::unitarityR1(const StandardModel& SM_i)
3074 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3075 {}
3076 
3077 double unitarityR1::computeThValue()
3078 {
3079  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3080  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3081  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3082  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3083  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3084  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3085  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3086  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3087  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3088  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3089  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3090  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3091  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3092 
3093  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3094  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3095  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3096  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3097  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3098  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3099  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3100  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3101  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3102  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3103  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3104  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3105 
3106  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
3107  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3108  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
3109  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3110 
3111  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
3112  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3113  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
3114  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3115 
3116  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
3117  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
3118  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
3119  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3120 
3121  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
3122  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
3123  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
3124 
3125  double R=0.01;
3126  double a0LO = uniNLO1a+uniNLO2a+sqrt((uniNLO1a-uniNLO2a)*(uniNLO1a-uniNLO2a)+4.0*uniNLO3a*uniNLO3a);
3127  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3128  if(a0NLO.abs()>Rpeps)
3129  {
3130  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3131  }
3132 
3133  return R;
3134 }
3135 
3136 unitarityR2::unitarityR2(const StandardModel& SM_i)
3137 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3138 {}
3139 
3140 double unitarityR2::computeThValue()
3141 {
3142  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3143  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3144  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3145  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3146  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3147  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3148  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3149  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3150  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3151  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3152  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3153  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3154  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3155 
3156  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3157  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3158  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3159  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3160  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3161  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3162  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3163  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3164  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3165  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3166  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3167  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3168 
3169  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
3170  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3171  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
3172  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3173 
3174  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
3175  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3176  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
3177  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3178 
3179  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
3180  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
3181  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
3182  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3183 
3184  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
3185  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
3186  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
3187 
3188  double R=0.01;
3189  double a0LO = uniNLO1a+uniNLO2a-sqrt((uniNLO1a-uniNLO2a)*(uniNLO1a-uniNLO2a)+4.0*uniNLO3a*uniNLO3a);
3190  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3191  if(a0NLO.abs()>Rpeps)
3192  {
3193  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3194  }
3195 
3196  return R;
3197 }
3198 
3199 unitarityR3::unitarityR3(const StandardModel& SM_i)
3200 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3201 {}
3202 
3203 double unitarityR3::computeThValue()
3204 {
3205  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3206  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3207  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3208  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3209  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3210  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3211  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3212  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3213  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3214  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3215  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3216  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3217 
3218  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3219  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3220  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3221  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3222  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3223  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3224  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3225  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3226  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3227 
3228  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
3229  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
3230  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3231  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3232 
3233  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
3234  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3235  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
3236  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3237 
3238  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
3239  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
3240 
3241  double R=0.01;
3242  double a0LO = uniNLO4a+uniNLO5a;
3243  gslpp::complex a0NLO = (uniA+uniC);
3244  if(a0NLO.abs()>Rpeps)
3245  {
3246  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3247  }
3248 
3249  return R;
3250 }
3251 
3252 unitarityR4::unitarityR4(const StandardModel& SM_i)
3253 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3254 {}
3255 
3256 double unitarityR4::computeThValue()
3257 {
3258  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3259  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3260  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3261  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3262  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3263  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3264  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3265  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3266  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3267  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3268  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3269  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3270 
3271  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3272  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3273  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3274  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3275  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3276  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3277  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3278  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3279  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3280 
3281  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
3282  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
3283  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3284  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3285 
3286  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
3287  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3288  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
3289  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3290 
3291  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
3292  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
3293 
3294  double R=0.01;
3295  double a0LO = uniNLO4a-uniNLO5a;
3296  gslpp::complex a0NLO = (uniA-uniC);
3297  if(a0NLO.abs()>Rpeps)
3298  {
3299  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3300  }
3301 
3302  return R;
3303 }
3304 
3305 unitarityR5::unitarityR5(const StandardModel& SM_i)
3306 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3307 {}
3308 
3309 double unitarityR5::computeThValue()
3310 {
3311  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3312  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3313  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3314  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3315  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3316  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3317  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3318  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3319  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3320  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3321  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3322  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3323  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3324 
3325  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3326  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3327  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3328  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3329  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3330  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3331  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3332  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3333  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3334 
3335  double uniNLO6a = -la1Q/(16.0*M_PI);
3336  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3337  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3338  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3339 
3340  double uniNLO7a = -la2Q/(16.0*M_PI);
3341  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3342  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3343  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3344 
3345  double uniNLO8a = -la4Q/(16.0*M_PI);
3346  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
3347  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
3348  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3349 
3350  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
3351  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
3352  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
3353 
3354  double R=0.01;
3355  double a0LO = uniNLO6a+uniNLO7a+sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO8a*uniNLO8a);
3356  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3357  if(a0NLO.abs()>Rpeps)
3358  {
3359  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3360  }
3361 
3362  return R;
3363 }
3364 
3365 unitarityR6::unitarityR6(const StandardModel& SM_i)
3366 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3367 {}
3368 
3369 double unitarityR6::computeThValue()
3370 {
3371  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3372  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3373  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3374  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3375  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3376  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3377  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3378  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3379  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3380  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3381  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3382  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3383  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3384 
3385  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3386  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3387  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3388  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3389  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3390  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3391  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3392  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3393  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3394 
3395  double uniNLO6a = -la1Q/(16.0*M_PI);
3396  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3397  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3398  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3399 
3400  double uniNLO7a = -la2Q/(16.0*M_PI);
3401  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3402  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3403  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3404 
3405  double uniNLO8a = -la4Q/(16.0*M_PI);
3406  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
3407  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
3408  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3409 
3410  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
3411  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
3412  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
3413 
3414  double R=0.01;
3415  double a0LO = uniNLO6a+uniNLO7a-sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO8a*uniNLO8a);
3416  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3417  if(a0NLO.abs()>Rpeps)
3418  {
3419  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3420  }
3421 
3422  return R;
3423 }
3424 
3425 unitarityR7::unitarityR7(const StandardModel& SM_i)
3426 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3427 {}
3428 
3429 double unitarityR7::computeThValue()
3430 {
3431  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3432  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3433  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3434  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3435  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3436  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3437  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3438  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3439  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3440  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3441  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3442  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3443  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3444 
3445  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3446  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3447  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3448  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3449  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3450  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3451  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3452  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3453  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3454 
3455  double uniNLO6a = -la1Q/(16.0*M_PI);
3456  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3457  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3458  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3459 
3460  double uniNLO7a = -la2Q/(16.0*M_PI);
3461  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3462  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3463  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3464 
3465  double uniNLO9a = -la4Q/(16.0*M_PI);
3466  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
3467  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
3468  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3469 
3470  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
3471  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
3472  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
3473 
3474  double R=0.01;
3475  double a0LO = uniNLO6a+uniNLO7a+sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO9a*uniNLO9a);
3476  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3477  if(a0NLO.abs()>Rpeps)
3478  {
3479  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3480  }
3481 
3482  return R;
3483 }
3484 
3485 unitarityR8::unitarityR8(const StandardModel& SM_i)
3486 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3487 {}
3488 
3489 double unitarityR8::computeThValue()
3490 {
3491  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3492  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3493  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3494  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3495  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3496  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3497  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3498  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3499  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3500  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3501  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3502  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3503  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3504 
3505  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3506  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3507  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3508  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3509  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3510  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3511  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
3512  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
3513  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
3514 
3515  double uniNLO6a = -la1Q/(16.0*M_PI);
3516  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3517  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3518  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3519 
3520  double uniNLO7a = -la2Q/(16.0*M_PI);
3521  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3522  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
3523  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3524 
3525  double uniNLO9a = -la4Q/(16.0*M_PI);
3526  double uniNLO9b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
3527  gslpp::complex uniNLO9c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
3528  gslpp::complex uniNLO9d = -la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3529 
3530  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
3531  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
3532  gslpp::complex uniC=uniNLO9a+uniNLO9b+uniNLO9c+uniNLO9d;
3533 
3534  double R=0.01;
3535  double a0LO = uniNLO6a+uniNLO7a-sqrt((uniNLO6a-uniNLO7a)*(uniNLO6a-uniNLO7a)+4.0*uniNLO9a*uniNLO9a);
3536  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3537  if(a0NLO.abs()>Rpeps)
3538  {
3539  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3540  }
3541 
3542  return R;
3543 }
3544 
3545 unitarityR9::unitarityR9(const StandardModel& SM_i)
3546 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3547 {}
3548 
3549 double unitarityR9::computeThValue()
3550 {
3551  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3552  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3553  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3554  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3555  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3556  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3557  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3558  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3559  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3560  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3561  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3562  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3563 
3564  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3565  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3566  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3567  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3568  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3569  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3570 
3571  double uniNLO10a = -la3Q/(16.0*M_PI);
3572  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
3573  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3574  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3575 
3576  double uniNLO11a = -la5Q/(16.0*M_PI);
3577  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3578  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
3579  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3580 
3581  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
3582  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
3583 
3584  double R=0.01;
3585  double a0LO = uniNLO10a+uniNLO11a;
3586  gslpp::complex a0NLO = (uniA+uniC);
3587  if(a0NLO.abs()>Rpeps)
3588  {
3589  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3590  }
3591 
3592  return R;
3593 }
3594 
3595 unitarityR10::unitarityR10(const StandardModel& SM_i)
3596 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3597 {}
3598 
3599 double unitarityR10::computeThValue()
3600 {
3601  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3602  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3603  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3604  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3605  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3606  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3607  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3608  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3609  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3610  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3611  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3612  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3613 
3614  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3615  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3616  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3617  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3618  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3619  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3620 
3621  double uniNLO10a = -la3Q/(16.0*M_PI);
3622  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
3623  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3624  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3625 
3626  double uniNLO11a = -la5Q/(16.0*M_PI);
3627  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3628  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
3629  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3630 
3631  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
3632  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
3633 
3634  double R=0.01;
3635  double a0LO = uniNLO10a-uniNLO11a;
3636  gslpp::complex a0NLO = uniA-uniC;
3637  if(a0NLO.abs()>Rpeps)
3638  {
3639  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3640  }
3641 
3642  return R;
3643 }
3644 
3645 unitarityR11::unitarityR11(const StandardModel& SM_i)
3646 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3647 {}
3648 
3649 double unitarityR11::computeThValue()
3650 {
3651  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3652  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3653  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3654  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3655  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3656  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3657  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3658  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3659  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3660  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3661  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3662  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
3663  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3664 
3665  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3666  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3667  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3668  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3669  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3670  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3671 
3672  double uniNLO12a = -la3Q/(16.0*M_PI);
3673  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
3674  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3675  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
3676 
3677  double uniNLO13a = -la5Q/(16.0*M_PI);
3678  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3679  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
3680  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3681 
3682  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
3683  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
3684 
3685  double R=0.01;
3686  double a0LO = uniNLO12a+uniNLO13a;
3687  gslpp::complex a0NLO = uniA+uniC;
3688  if(a0NLO.abs()>Rpeps)
3689  {
3690  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3691  }
3692 
3693  return R;
3694 }
3695 
3696 unitarityR12::unitarityR12(const StandardModel& SM_i)
3697 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3698 {}
3699 
3700 double unitarityR12::computeThValue()
3701 {
3702  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3703  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3704  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3705  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3706  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3707  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3708  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3709  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3710  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3711  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3712  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3713  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
3714  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3715 
3716  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
3717  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
3718  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3719  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3720  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3721  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3722 
3723  double uniNLO12a = -la3Q/(16.0*M_PI);
3724  double uniNLO12b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
3725  gslpp::complex uniNLO12c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3726  gslpp::complex uniNLO12d = -la3Q/(512.0*M_PI*M_PI*M_PI) * WFRc3;
3727 
3728  double uniNLO13a = -la5Q/(16.0*M_PI);
3729  double uniNLO13b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3730  gslpp::complex uniNLO13c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
3731  gslpp::complex uniNLO13d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3732 
3733  gslpp::complex uniA=uniNLO12a+uniNLO12b+uniNLO12c+uniNLO12d;
3734  gslpp::complex uniC=uniNLO13a+uniNLO13b+uniNLO13c+uniNLO13d;
3735 
3736  double R=0.01;
3737  double a0LO = uniNLO12a-uniNLO13a;
3738  gslpp::complex a0NLO = uniA-uniC;
3739  if(a0NLO.abs()>Rpeps)
3740  {
3741  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3742  }
3743 
3744  return R;
3745 }
3746 
3747 unitarityR13::unitarityR13(const StandardModel& SM_i)
3748 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3749 {}
3750 
3751 double unitarityR13::computeThValue()
3752 {
3753  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3754  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3755  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3756  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3757  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3758  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3759  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3760  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3761  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3762  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3763  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3764  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3765  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
3766  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
3767  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3768 
3769  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3770  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3771  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3772  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3773  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3774  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3775  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3776  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3777  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3778 
3779  double uniNLO15a = -la1Q/(16.0*M_PI);
3780  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3781  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3782  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
3783 
3784  double uniNLO16a = -la2Q/(16.0*M_PI);
3785  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3786  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3787  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
3788 
3789  double uniNLO17a = -la5Q/(16.0*M_PI);
3790  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3791  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
3792  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
3793 
3794  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
3795  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
3796  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
3797 
3798  double R=0.01;
3799  double a0LO = uniNLO15a+uniNLO16a+sqrt((uniNLO15a-uniNLO16a)*(uniNLO15a-uniNLO16a)+4.0*uniNLO17a*uniNLO17a);
3800  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3801  if(a0NLO.abs()>Rpeps)
3802  {
3803  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3804  }
3805 
3806  return R;
3807 }
3808 
3809 unitarityR14::unitarityR14(const StandardModel& SM_i)
3810 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3811 {}
3812 
3813 double unitarityR14::computeThValue()
3814 {
3815  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3816  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3817  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3818  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3819  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3820  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3821  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3822  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3823  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3824  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3825  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3826  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3827  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
3828  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
3829  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3830 
3831  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3832  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3833  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3834  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3835  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3836  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3837  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3838  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3839  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3840 
3841  double uniNLO15a = -la1Q/(16.0*M_PI);
3842  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3843  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3844  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
3845 
3846  double uniNLO16a = -la2Q/(16.0*M_PI);
3847  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3848  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3849  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
3850 
3851  double uniNLO17a = -la5Q/(16.0*M_PI);
3852  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3853  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
3854  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
3855 
3856  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
3857  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
3858  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
3859 
3860  double R=0.01;
3861  double a0LO = uniNLO15a+uniNLO16a-sqrt((uniNLO15a-uniNLO16a)*(uniNLO15a-uniNLO16a)+4.0*uniNLO17a*uniNLO17a);
3862  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3863  if(a0NLO.abs()>Rpeps)
3864  {
3865  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3866  }
3867 
3868  return R;
3869 }
3870 
3871 unitarityR15::unitarityR15(const StandardModel& SM_i)
3872 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3873 {}
3874 
3875 double unitarityR15::computeThValue()
3876 {
3877  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3878  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3879  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3880  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3881  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3882  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3883  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3884  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3885  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3886  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3887  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3888  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3889  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3890 
3891  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3892  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3893  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3894  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3895  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3896  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3897  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3898  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3899  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3900 
3901  double uniNLO18a = -la1Q/(16.0*M_PI);
3902  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3903  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3904  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3905 
3906  double uniNLO19a = -la2Q/(16.0*M_PI);
3907  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3908  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3909  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3910 
3911  double uniNLO20a = -la5Q/(16.0*M_PI);
3912  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3913  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
3914  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3915 
3916  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
3917  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
3918  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
3919 
3920  double R=0.01;
3921  double a0LO = uniNLO18a+uniNLO19a+sqrt((uniNLO18a-uniNLO19a)*(uniNLO18a-uniNLO19a)+4.0*uniNLO20a*uniNLO20a);
3922  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3923  if(a0NLO.abs()>Rpeps)
3924  {
3925  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3926  }
3927 
3928  return R;
3929 }
3930 
3931 unitarityR16::unitarityR16(const StandardModel& SM_i)
3932 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3933 {}
3934 
3935 double unitarityR16::computeThValue()
3936 {
3937  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3938  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3939  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
3940  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
3941  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
3942  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
3943  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
3944  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
3945  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
3946  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
3947  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
3948  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
3949  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
3950 
3951  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3952  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
3953  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
3954  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
3955  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
3956  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
3957  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
3958  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
3959  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
3960 
3961  double uniNLO18a = -la1Q/(16.0*M_PI);
3962  double uniNLO18b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
3963  gslpp::complex uniNLO18c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3964  gslpp::complex uniNLO18d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
3965 
3966  double uniNLO19a = -la2Q/(16.0*M_PI);
3967  double uniNLO19b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
3968  gslpp::complex uniNLO19c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
3969  gslpp::complex uniNLO19d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
3970 
3971  double uniNLO20a = -la5Q/(16.0*M_PI);
3972  double uniNLO20b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
3973  gslpp::complex uniNLO20c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
3974  gslpp::complex uniNLO20d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
3975 
3976  gslpp::complex uniA=uniNLO18a+uniNLO18b+uniNLO18c+uniNLO18d;
3977  gslpp::complex uniB=uniNLO19a+uniNLO19b+uniNLO19c+uniNLO19d;
3978  gslpp::complex uniC=uniNLO20a+uniNLO20b+uniNLO20c+uniNLO20d;
3979 
3980  double R=0.01;
3981  double a0LO = uniNLO18a+uniNLO19a-sqrt((uniNLO18a-uniNLO19a)*(uniNLO18a-uniNLO19a)+4.0*uniNLO20a*uniNLO20a);
3982  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
3983  if(a0NLO.abs()>Rpeps)
3984  {
3985  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
3986  }
3987 
3988  return R;
3989 }
3990 
3991 unitarityR17::unitarityR17(const StandardModel& SM_i)
3992 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
3993 {}
3994 
3995 double unitarityR17::computeThValue()
3996 {
3997  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
3998  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
3999  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4000  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4001  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4002  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4003  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4004  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4005  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4006  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4007  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4008  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4009  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
4010  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
4011  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
4012 
4013  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4014  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4015  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4016  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4017  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4018  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4019  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4020  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4021  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4022 
4023  double uniNLO21a = -la1Q/(16.0*M_PI);
4024  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4025  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4026  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
4027 
4028  double uniNLO22a = -la2Q/(16.0*M_PI);
4029  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4030  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4031  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
4032 
4033  double uniNLO23a = -la5Q/(16.0*M_PI);
4034  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4035  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
4036  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
4037 
4038  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
4039  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
4040  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
4041 
4042  double R=0.01;
4043  double a0LO = uniNLO21a+uniNLO22a+sqrt((uniNLO21a-uniNLO22a)*(uniNLO21a-uniNLO22a)+4.0*uniNLO23a*uniNLO23a);
4044  gslpp::complex a0NLO = (uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
4045  if(a0NLO.abs()>Rpeps)
4046  {
4047  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
4048  }
4049 
4050  return R;
4051 }
4052 
4053 unitarityR18::unitarityR18(const StandardModel& SM_i)
4054 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4055 {}
4056 
4057 double unitarityR18::computeThValue()
4058 {
4059  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4060  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4061  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4062  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4063  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4064  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4065  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4066  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4067  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4068  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4069  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4070  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4071  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
4072  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
4073  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
4074 
4075  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4076  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4077  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4078  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4079  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4080  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4081  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4082  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4083  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4084 
4085  double uniNLO21a = -la1Q/(16.0*M_PI);
4086  double uniNLO21b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4087  gslpp::complex uniNLO21c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4088  gslpp::complex uniNLO21d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1+2.0*WFRc2-WFRc3-2.0*WFRc4);
4089 
4090  double uniNLO22a = -la2Q/(16.0*M_PI);
4091  double uniNLO22b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4092  gslpp::complex uniNLO22c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4093  gslpp::complex uniNLO22d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2+WFRc3-2.0*WFRc4);
4094 
4095  double uniNLO23a = -la5Q/(16.0*M_PI);
4096  double uniNLO23b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4097  gslpp::complex uniNLO23c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
4098  gslpp::complex uniNLO23d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * (WFRc2-WFRc4);
4099 
4100  gslpp::complex uniA=uniNLO21a+uniNLO21b+uniNLO21c+uniNLO21d;
4101  gslpp::complex uniB=uniNLO22a+uniNLO22b+uniNLO22c+uniNLO22d;
4102  gslpp::complex uniC=uniNLO23a+uniNLO23b+uniNLO23c+uniNLO23d;
4103 
4104  double R=0.01;
4105  double a0LO = uniNLO21a+uniNLO22a-sqrt((uniNLO21a-uniNLO22a)*(uniNLO21a-uniNLO22a)+4.0*uniNLO23a*uniNLO23a);
4106  gslpp::complex a0NLO = (uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC));
4107  if(a0NLO.abs()>Rpeps)
4108  {
4109  R = (a0NLO-a0LO).abs()/(a0NLO.abs());
4110  }
4111 
4112  return R;
4113 }
4114 
4115 unitarityR19::unitarityR19(const StandardModel& SM_i)
4116 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4117 {}
4118 
4119 double unitarityR19::computeThValue()
4120 {
4121  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4122  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4123  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4124  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4125  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4126  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4127  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4128  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4129  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4130  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4131  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4132  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
4133 
4134  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4135  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4136  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4137  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4138  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4139  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4140 
4141  double uniNLO14a = -(la3Q-la4Q)/(16.0*M_PI);
4142  double uniNLO14b = 3.0*(betalambda3-betalambda4)/(256.0*M_PI*M_PI*M_PI);
4143  gslpp::complex uniNLO14c = (gslpp::complex::i()*M_PI-1.0)*(la3Q-la4Q)*(la3Q-la4Q)/(256.0*M_PI*M_PI*M_PI);
4144  gslpp::complex uniNLO14d = -(la3Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4145 
4146  double R=0.01;
4147  gslpp::complex a0NLO = (uniNLO14a+uniNLO14b+uniNLO14c+uniNLO14d);
4148  if(a0NLO.abs()>Rpeps)
4149  {
4150  R = (a0NLO-uniNLO14a).abs()/(a0NLO.abs());
4151  }
4152 
4153  return R;
4154 }
4155 
4156 unitarityR20::unitarityR20(const StandardModel& SM_i)
4157 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4158 {}
4159 
4160 double unitarityR20::computeThValue()
4161 {
4162  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4163  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4164  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4165  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4166  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4167  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4168  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4169  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4170  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4171  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4172  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
4173  double Rpeps = myTHDM.getMyTHDMCache()->Rpeps;
4174 
4175  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4176  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4177  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4178  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4179  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4180  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4181 
4182  double uniNLO24a = -(la3Q+la4Q)/(16.0*M_PI);
4183  double uniNLO24b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
4184  gslpp::complex uniNLO24c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
4185  gslpp::complex uniNLO24d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc4;
4186 
4187  double R=0.01;
4188  gslpp::complex a0NLO = uniNLO24a+uniNLO24b+uniNLO24c+uniNLO24d;
4189  if(a0NLO.abs()>Rpeps)
4190  {
4191  R = (a0NLO-uniNLO24a).abs()/(a0NLO.abs());
4192  }
4193 
4194  return R;
4195 }
4196 
4197 unitaritya00evenpRe::unitaritya00evenpRe(const StandardModel& SM_i)
4198 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4199 {}
4200 
4201 double unitaritya00evenpRe::computeThValue()
4202 {
4203  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4204  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4205  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4206  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4207  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4208  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4209  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4210  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4211  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4212  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4213  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4214  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4215 
4216  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4217  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4218  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4219  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4220  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4221  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4222  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4223  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4224  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4225  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4226  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4227  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4228 
4229  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
4230  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4231  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4232  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4233 
4234  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
4235  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4236  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4237  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4238 
4239  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
4240  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
4241  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
4242  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4243 
4244  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
4245  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
4246  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
4247 
4248  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
4249 }
4250 
4251 unitaritya00evenpIm::unitaritya00evenpIm(const StandardModel& SM_i)
4252 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4253 {}
4254 
4255 double unitaritya00evenpIm::computeThValue()
4256 {
4257  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4258  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4259  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4260  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4261  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4262  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4263  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4264  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4265  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4266  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4267  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4268  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4269 
4270  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4271  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4272  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4273  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4274  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4275  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4276  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4277  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4278  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4279  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4280  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4281  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4282 
4283  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
4284  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4285  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4286  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4287 
4288  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
4289  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4290  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4291  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4292 
4293  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
4294  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
4295  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
4296  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4297 
4298  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
4299  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
4300  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
4301 
4302  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
4303 }
4304 
4305 unitaritya00evenmRe::unitaritya00evenmRe(const StandardModel& SM_i)
4306 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4307 {}
4308 
4309 double unitaritya00evenmRe::computeThValue()
4310 {
4311  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4312  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4313  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4314  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4315  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4316  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4317  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4318  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4319  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4320  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4321  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4322  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4323 
4324  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4325  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4326  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4327  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4328  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4329  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4330  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4331  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4332  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4333  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4334  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4335  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4336 
4337  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
4338  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4339  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4340  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4341 
4342  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
4343  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4344  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4345  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4346 
4347  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
4348  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
4349  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
4350  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4351 
4352  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
4353  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
4354  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
4355 
4356  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
4357 }
4358 
4359 unitaritya00evenmIm::unitaritya00evenmIm(const StandardModel& SM_i)
4360 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4361 {}
4362 
4363 double unitaritya00evenmIm::computeThValue()
4364 {
4365  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4366  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4367  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4368  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4369  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4370  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4371  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4372  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4373  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4374  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4375  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4376  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4377 
4378  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4379  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4380  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4381  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4382  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4383  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4384  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4385  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4386  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4387  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4388  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4389  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4390 
4391  double uniNLO1a = -3.0*la1Q/(16.0*M_PI);
4392  double uniNLO1b = 9.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4393  gslpp::complex uniNLO1c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la1Q*la1Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4394  gslpp::complex uniNLO1d = -3.0*la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4395 
4396  double uniNLO2a = -3.0*la2Q/(16.0*M_PI);
4397  double uniNLO2b = 9.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4398  gslpp::complex uniNLO2c = (gslpp::complex::i()*M_PI-1.0)*(9.0*la2Q*la2Q+(2.0*la3Q+la4Q)*(2.0*la3Q+la4Q))/(256.0*M_PI*M_PI*M_PI);
4399  gslpp::complex uniNLO2d = -3.0*la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4400 
4401  double uniNLO3a = -(2.0*la3Q+la4Q)/(16.0*M_PI);
4402  double uniNLO3b = 3.0*(2.0*betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
4403  gslpp::complex uniNLO3c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*(2.0*la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
4404  gslpp::complex uniNLO3d = -(2.0*la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4405 
4406  gslpp::complex uniA=uniNLO1a+uniNLO1b+uniNLO1c+uniNLO1d;
4407  gslpp::complex uniB=uniNLO2a+uniNLO2b+uniNLO2c+uniNLO2d;
4408  gslpp::complex uniC=uniNLO3a+uniNLO3b+uniNLO3c+uniNLO3d;
4409 
4410  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
4411 }
4412 
4413 unitaritya00oddpRe::unitaritya00oddpRe(const StandardModel& SM_i)
4414 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4415 {}
4416 
4417 double unitaritya00oddpRe::computeThValue()
4418 {
4419  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4420  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4421  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4422  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4423  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4424  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4425  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4426  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4427  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4428  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4429  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4430 
4431  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4432  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4433  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4434  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4435  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4436  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4437  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4438  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4439  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4440 
4441  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
4442  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
4443  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4444  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4445 
4446  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
4447  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4448  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
4449  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4450 
4451  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
4452  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
4453 
4454  return (uniA+uniC).real();
4455 }
4456 
4457 unitaritya00oddpIm::unitaritya00oddpIm(const StandardModel& SM_i)
4458 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4459 {}
4460 
4461 double unitaritya00oddpIm::computeThValue()
4462 {
4463  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4464  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4465  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4466  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4467  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4468  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4469  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4470  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4471  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4472  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4473  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4474 
4475  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4476  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4477  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4478  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4479  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4480  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4481  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4482  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4483  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4484 
4485  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
4486  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
4487  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4488  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4489 
4490  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
4491  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4492  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
4493  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4494 
4495  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
4496  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
4497 
4498  return (uniA+uniC).imag();
4499 }
4500 
4501 unitaritya00oddmRe::unitaritya00oddmRe(const StandardModel& SM_i)
4502 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4503 {}
4504 
4505 double unitaritya00oddmRe::computeThValue()
4506 {
4507  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4508  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4509  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4510  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4511  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4512  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4513  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4514  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4515  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4516  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4517  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4518 
4519  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4520  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4521  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4522  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4523  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4524  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4525  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4526  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4527  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4528 
4529  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
4530  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
4531  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4532  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4533 
4534  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
4535  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4536  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
4537  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4538 
4539  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
4540  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
4541 
4542  return (uniA-uniC).real();
4543 }
4544 
4545 unitaritya00oddmIm::unitaritya00oddmIm(const StandardModel& SM_i)
4546 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4547 {}
4548 
4549 double unitaritya00oddmIm::computeThValue()
4550 {
4551  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4552  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4553  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4554  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4555  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4556  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4557  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4558  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4559  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4560  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4561  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4562 
4563  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4564  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4565  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4566  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4567  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4568  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4569  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4570  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4571  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4572 
4573  double uniNLO4a = -(la3Q+2.0*la4Q)/(16.0*M_PI);
4574  double uniNLO4b = 3.0*(betalambda3+2.0*betalambda4)/(256.0*M_PI*M_PI*M_PI);
4575  gslpp::complex uniNLO4c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+4.0*la3Q*la4Q+4.0*la4Q*la4Q+9.0*la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4576  gslpp::complex uniNLO4d = -(la3Q+la4Q+la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4577 
4578  double uniNLO5a = -3.0*la5Q/(16.0*M_PI);
4579  double uniNLO5b = 9.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4580  gslpp::complex uniNLO5c = 3.0*(gslpp::complex::i()*M_PI-1.0)*(la3Q+2.0*la4Q)*la5Q/(128.0*M_PI*M_PI*M_PI);
4581  gslpp::complex uniNLO5d = -(la4Q+2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4582 
4583  gslpp::complex uniA=uniNLO4a+uniNLO4b+uniNLO4c+uniNLO4d;
4584  gslpp::complex uniC=uniNLO5a+uniNLO5b+uniNLO5c+uniNLO5d;
4585 
4586  return (uniA-uniC).imag();
4587 }
4588 
4589 unitaritya01evenpRe::unitaritya01evenpRe(const StandardModel& SM_i)
4590 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4591 {}
4592 
4593 double unitaritya01evenpRe::computeThValue()
4594 {
4595  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4596  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4597  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4598  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4599  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4600  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4601  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4602  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4603  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4604  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4605  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4606  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4607 
4608  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4609  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4610  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4611  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4612  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4613  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4614  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4615  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4616  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4617 
4618  double uniNLO6a = -la1Q/(16.0*M_PI);
4619  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4620  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4621  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4622 
4623  double uniNLO7a = -la2Q/(16.0*M_PI);
4624  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4625  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4626  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4627 
4628  double uniNLO8a = -la4Q/(16.0*M_PI);
4629  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
4630  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
4631  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4632 
4633  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
4634  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
4635  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
4636 
4637  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
4638 }
4639 
4640 unitaritya01evenpIm::unitaritya01evenpIm(const StandardModel& SM_i)
4641 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4642 {}
4643 
4644 double unitaritya01evenpIm::computeThValue()
4645 {
4646  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4647  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4648  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4649  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4650  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4651  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4652  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4653  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4654  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4655  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4656  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4657  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4658 
4659  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4660  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4661  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4662  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4663  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4664  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4665  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4666  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4667  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4668 
4669  double uniNLO6a = -la1Q/(16.0*M_PI);
4670  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4671  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4672  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4673 
4674  double uniNLO7a = -la2Q/(16.0*M_PI);
4675  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4676  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4677  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4678 
4679  double uniNLO8a = -la4Q/(16.0*M_PI);
4680  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
4681  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
4682  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4683 
4684  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
4685  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
4686  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
4687 
4688  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
4689 }
4690 
4691 unitaritya01evenmRe::unitaritya01evenmRe(const StandardModel& SM_i)
4692 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4693 {}
4694 
4695 double unitaritya01evenmRe::computeThValue()
4696 {
4697  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4698  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4699  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4700  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4701  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4702  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4703  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4704  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4705  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4706  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4707  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4708  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4709 
4710  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4711  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4712  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4713  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4714  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4715  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4716  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4717  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4718  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4719 
4720  double uniNLO6a = -la1Q/(16.0*M_PI);
4721  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4722  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4723  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4724 
4725  double uniNLO7a = -la2Q/(16.0*M_PI);
4726  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4727  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4728  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4729 
4730  double uniNLO8a = -la4Q/(16.0*M_PI);
4731  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
4732  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
4733  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4734 
4735  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
4736  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
4737  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
4738 
4739  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
4740 }
4741 
4742 unitaritya01evenmIm::unitaritya01evenmIm(const StandardModel& SM_i)
4743 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4744 {}
4745 
4746 double unitaritya01evenmIm::computeThValue()
4747 {
4748  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4749  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4750  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4751  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4752  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4753  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4754  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4755  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4756  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4757  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4758  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
4759  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4760 
4761  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4762  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
4763  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
4764  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
4765  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
4766  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
4767  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4768  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4769  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4770 
4771  double uniNLO6a = -la1Q/(16.0*M_PI);
4772  double uniNLO6b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
4773  gslpp::complex uniNLO6c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4774  gslpp::complex uniNLO6d = -la1Q/(512.0*M_PI*M_PI*M_PI) * WFRc1;
4775 
4776  double uniNLO7a = -la2Q/(16.0*M_PI);
4777  double uniNLO7b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
4778  gslpp::complex uniNLO7c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la4Q*la4Q)/(256.0*M_PI*M_PI*M_PI);
4779  gslpp::complex uniNLO7d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2);
4780 
4781  double uniNLO8a = -la4Q/(16.0*M_PI);
4782  double uniNLO8b = 3.0*betalambda4/(256.0*M_PI*M_PI*M_PI);
4783  gslpp::complex uniNLO8c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la4Q/(256.0*M_PI*M_PI*M_PI);
4784  gslpp::complex uniNLO8d = -la4Q/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4785 
4786  gslpp::complex uniA=uniNLO6a+uniNLO6b+uniNLO6c+uniNLO6d;
4787  gslpp::complex uniB=uniNLO7a+uniNLO7b+uniNLO7c+uniNLO7d;
4788  gslpp::complex uniC=uniNLO8a+uniNLO8b+uniNLO8c+uniNLO8d;
4789 
4790  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
4791 }
4792 
4793 unitaritya01oddpRe::unitaritya01oddpRe(const StandardModel& SM_i)
4794 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4795 {}
4796 
4797 double unitaritya01oddpRe::computeThValue()
4798 {
4799  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4800  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4801  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4802  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4803  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4804  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4805  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4806  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4807  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4808  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4809  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4810 
4811  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4812  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4813  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4814  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4815  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4816  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4817 
4818  double uniNLO10a = -la3Q/(16.0*M_PI);
4819  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
4820  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4821  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4822 
4823  double uniNLO11a = -la5Q/(16.0*M_PI);
4824  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4825  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
4826  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4827 
4828  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
4829  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
4830 
4831  return (uniA+uniC).real();
4832 }
4833 
4834 unitaritya01oddpIm::unitaritya01oddpIm(const StandardModel& SM_i)
4835 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4836 {}
4837 
4838 double unitaritya01oddpIm::computeThValue()
4839 {
4840  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4841  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4842  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4843  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4844  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4845  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4846  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4847  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4848  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4849  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4850  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4851 
4852  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4853  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4854  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4855  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4856  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4857  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4858 
4859  double uniNLO10a = -la3Q/(16.0*M_PI);
4860  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
4861  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4862  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4863 
4864  double uniNLO11a = -la5Q/(16.0*M_PI);
4865  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4866  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
4867  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4868 
4869  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
4870  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
4871 
4872  return (uniA+uniC).imag();
4873 }
4874 
4875 unitaritya01oddmRe::unitaritya01oddmRe(const StandardModel& SM_i)
4876 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4877 {}
4878 
4879 double unitaritya01oddmRe::computeThValue()
4880 {
4881  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4882  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4883  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4884  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4885  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4886  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4887  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4888  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4889  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4890  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4891  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4892 
4893  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4894  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4895  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4896  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4897  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4898  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4899 
4900  double uniNLO10a = -la3Q/(16.0*M_PI);
4901  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
4902  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4903  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4904 
4905  double uniNLO11a = -la5Q/(16.0*M_PI);
4906  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4907  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
4908  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4909 
4910  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
4911  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
4912 
4913  return (uniA-uniC).real();
4914 }
4915 
4916 unitaritya01oddmIm::unitaritya01oddmIm(const StandardModel& SM_i)
4917 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4918 {}
4919 
4920 double unitaritya01oddmIm::computeThValue()
4921 {
4922  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4923  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4924  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4925  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4926  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4927  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4928  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4929  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4930  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4931  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4932  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4933 
4934  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4935  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4936  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4937  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
4938  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
4939  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4940 
4941  double uniNLO10a = -la3Q/(16.0*M_PI);
4942  double uniNLO10b = 3.0*betalambda3/(256.0*M_PI*M_PI*M_PI);
4943  gslpp::complex uniNLO10c = (gslpp::complex::i()*M_PI-1.0)*(la3Q*la3Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
4944  gslpp::complex uniNLO10d = -(la3Q+la4Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4945 
4946  double uniNLO11a = -la5Q/(16.0*M_PI);
4947  double uniNLO11b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
4948  gslpp::complex uniNLO11c = (gslpp::complex::i()*M_PI-1.0)*la3Q*la5Q/(128.0*M_PI*M_PI*M_PI);
4949  gslpp::complex uniNLO11d = -(la4Q-2.0*la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4950 
4951  gslpp::complex uniA=uniNLO10a+uniNLO10b+uniNLO10c+uniNLO10d;
4952  gslpp::complex uniC=uniNLO11a+uniNLO11b+uniNLO11c+uniNLO11d;
4953 
4954  return (uniA-uniC).imag();
4955 }
4956 
4957 unitaritya10oddRe::unitaritya10oddRe(const StandardModel& SM_i)
4958 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4959 {}
4960 
4961 double unitaritya10oddRe::computeThValue()
4962 {
4963  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4964  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4965  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4966  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
4967  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
4968  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
4969  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
4970  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
4971  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
4972  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
4973  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
4974 
4975  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
4976  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
4977  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
4978  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
4979  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
4980  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
4981 
4982  double uniNLO14a = -(la3Q-la4Q)/(16.0*M_PI);
4983  double uniNLO14b = 3.0*(betalambda3-betalambda4)/(256.0*M_PI*M_PI*M_PI);
4984  gslpp::complex uniNLO14c = (gslpp::complex::i()*M_PI-1.0)*(la3Q-la4Q)*(la3Q-la4Q)/(256.0*M_PI*M_PI*M_PI);
4985  gslpp::complex uniNLO14d = -(la3Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
4986 
4987  return (uniNLO14a+uniNLO14b+uniNLO14c+uniNLO14d).real();
4988 }
4989 
4990 unitaritya10oddIm::unitaritya10oddIm(const StandardModel& SM_i)
4991 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
4992 {}
4993 
4994 double unitaritya10oddIm::computeThValue()
4995 {
4996  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
4997  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
4998  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
4999  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5000  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5001  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5002  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5003  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5004  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5005  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5006  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
5007 
5008  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
5009  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
5010  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5011  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
5012  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
5013  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
5014 
5015  double uniNLO14a = -(la3Q-la4Q)/(16.0*M_PI);
5016  double uniNLO14b = 3.0*(betalambda3-betalambda4)/(256.0*M_PI*M_PI*M_PI);
5017  gslpp::complex uniNLO14c = (gslpp::complex::i()*M_PI-1.0)*(la3Q-la4Q)*(la3Q-la4Q)/(256.0*M_PI*M_PI*M_PI);
5018  gslpp::complex uniNLO14d = -(la3Q-la5Q)/(512.0*M_PI*M_PI*M_PI) * WFRc2;
5019 
5020  return (uniNLO14a+uniNLO14b+uniNLO14c+uniNLO14d).imag();
5021 }
5022 
5023 unitaritya11evenpRe::unitaritya11evenpRe(const StandardModel& SM_i)
5024 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5025 {}
5026 
5027 double unitaritya11evenpRe::computeThValue()
5028 {
5029  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5030  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5031  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5032  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5033  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5034  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5035  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5036  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5037  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5038  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5039  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
5040  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
5041  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
5042  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5043 
5044  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5045  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
5046  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
5047  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5048  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
5049  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
5050  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
5051  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
5052  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5053 
5054  double uniNLO15a = -la1Q/(16.0*M_PI);
5055  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
5056  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5057  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
5058 
5059  double uniNLO16a = -la2Q/(16.0*M_PI);
5060  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
5061  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5062  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
5063 
5064  double uniNLO17a = -la5Q/(16.0*M_PI);
5065  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
5066  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
5067  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5068 
5069  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
5070  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
5071  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
5072 
5073  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
5074 }
5075 
5076 unitaritya11evenpIm::unitaritya11evenpIm(const StandardModel& SM_i)
5077 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5078 {}
5079 
5080 double unitaritya11evenpIm::computeThValue()
5081 {
5082  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5083  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5084  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5085  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5086  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5087  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5088  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5089  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5090  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5091  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5092  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
5093  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
5094  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
5095  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5096 
5097  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5098  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
5099  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
5100  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5101  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
5102  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
5103  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
5104  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
5105  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5106 
5107  double uniNLO15a = -la1Q/(16.0*M_PI);
5108  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
5109  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5110  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
5111 
5112  double uniNLO16a = -la2Q/(16.0*M_PI);
5113  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
5114  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5115  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
5116 
5117  double uniNLO17a = -la5Q/(16.0*M_PI);
5118  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
5119  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
5120  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5121 
5122  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
5123  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
5124  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
5125 
5126  return (0.5*(uniA+uniB+sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
5127 }
5128 
5129 unitaritya11evenmRe::unitaritya11evenmRe(const StandardModel& SM_i)
5130 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5131 {}
5132 
5133 double unitaritya11evenmRe::computeThValue()
5134 {
5135  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5136  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5137  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5138  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5139  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5140  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5141  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5142  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5143  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5144  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5145  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
5146  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
5147  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
5148  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5149 
5150  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5151  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
5152  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
5153  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5154  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
5155  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
5156  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
5157  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
5158  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5159 
5160  double uniNLO15a = -la1Q/(16.0*M_PI);
5161  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
5162  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5163  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
5164 
5165  double uniNLO16a = -la2Q/(16.0*M_PI);
5166  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
5167  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5168  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
5169 
5170  double uniNLO17a = -la5Q/(16.0*M_PI);
5171  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
5172  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
5173  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5174 
5175  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
5176  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
5177  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
5178 
5179  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).real();
5180 }
5181 
5182 unitaritya11evenmIm::unitaritya11evenmIm(const StandardModel& SM_i)
5183 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5184 {}
5185 
5186 double unitaritya11evenmIm::computeThValue()
5187 {
5188  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5189  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5190  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5191  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5192  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5193  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5194  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5195  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5196  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5197  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5198  double WFRc1 = myTHDM.getMyTHDMCache()->WFRcomb1;
5199  double WFRc2 = myTHDM.getMyTHDMCache()->WFRcomb2;
5200  double WFRc3 = myTHDM.getMyTHDMCache()->WFRcomb3;
5201  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5202 
5203  double betalambda1 = 6.0*la1Q*la1Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5204  + 6.0*la1Q*Yb1Q*Yb1Q + 2.0*la1Q*Ytau1Q*Ytau1Q
5205  - 6.0*Yb1Q*Yb1Q*Yb1Q*Yb1Q - 2.0*Ytau1Q*Ytau1Q*Ytau1Q*Ytau1Q;
5206  double betalambda2 = 6.0*la2Q*la2Q + 2.0*la3Q*la3Q + 2.0*la3Q*la4Q + la4Q*la4Q + la5Q*la5Q
5207  + 6.0*la2Q*Yb2Q*Yb2Q + 2.0*la2Q*Ytau2Q*Ytau2Q + 6.0*la2Q*YtQ*YtQ
5208  - 6.0*Yb2Q*Yb2Q*Yb2Q*Yb2Q - 2.0*Ytau2Q*Ytau2Q*Ytau2Q*Ytau2Q - 6.0*YtQ*YtQ*YtQ*YtQ;
5209  double betalambda5 = la5Q*(la1Q + la2Q + 4.0*la3Q + 6.0*la4Q)
5210  + 3.0*la5Q*Yb1Q*Yb1Q + la5Q*Ytau1Q*Ytau1Q + la5Q*(3.0*Yb2Q*Yb2Q + Ytau2Q*Ytau2Q + 3.0*YtQ*YtQ)
5211  - 6.0*Yb1Q*Yb1Q*Yb2Q*Yb2Q - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5212 
5213  double uniNLO15a = -la1Q/(16.0*M_PI);
5214  double uniNLO15b = 3.0*betalambda1/(256.0*M_PI*M_PI*M_PI);
5215  gslpp::complex uniNLO15c = (gslpp::complex::i()*M_PI-1.0)*(la1Q*la1Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5216  gslpp::complex uniNLO15d = -la1Q/(512.0*M_PI*M_PI*M_PI) * (WFRc1-2.0*WFRc2+WFRc3+2.0*WFRc4);
5217 
5218  double uniNLO16a = -la2Q/(16.0*M_PI);
5219  double uniNLO16b = 3.0*betalambda2/(256.0*M_PI*M_PI*M_PI);
5220  gslpp::complex uniNLO16c = (gslpp::complex::i()*M_PI-1.0)*(la2Q*la2Q+la5Q*la5Q)/(256.0*M_PI*M_PI*M_PI);
5221  gslpp::complex uniNLO16d = -la2Q/(512.0*M_PI*M_PI*M_PI) * (-WFRc1+2.0*WFRc2-WFRc3+2.0*WFRc4);
5222 
5223  double uniNLO17a = -la5Q/(16.0*M_PI);
5224  double uniNLO17b = 3.0*betalambda5/(256.0*M_PI*M_PI*M_PI);
5225  gslpp::complex uniNLO17c = (gslpp::complex::i()*M_PI-1.0)*(la1Q+la2Q)*la5Q/(256.0*M_PI*M_PI*M_PI);
5226  gslpp::complex uniNLO17d = -2.0*la5Q/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5227 
5228  gslpp::complex uniA=uniNLO15a+uniNLO15b+uniNLO15c+uniNLO15d;
5229  gslpp::complex uniB=uniNLO16a+uniNLO16b+uniNLO16c+uniNLO16d;
5230  gslpp::complex uniC=uniNLO17a+uniNLO17b+uniNLO17c+uniNLO17d;
5231 
5232  return (0.5*(uniA+uniB-sqrt((uniA-uniB)*(uniA-uniB)+4.0*uniC*uniC))).imag();
5233 }
5234 
5235 unitaritya11oddRe::unitaritya11oddRe(const StandardModel& SM_i)
5236 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5237 {}
5238 
5239 double unitaritya11oddRe::computeThValue()
5240 {
5241  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5242  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5243  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5244  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5245  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5246  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5247  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5248  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5249  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5250  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5251  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5252 
5253  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
5254  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
5255  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5256  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
5257  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
5258  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
5259 
5260  double uniNLO24a = -(la3Q+la4Q)/(16.0*M_PI);
5261  double uniNLO24b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
5262  gslpp::complex uniNLO24c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
5263  gslpp::complex uniNLO24d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5264 
5265  return (uniNLO24a+uniNLO24b+uniNLO24c+uniNLO24d).real();
5266 }
5267 
5268 unitaritya11oddIm::unitaritya11oddIm(const StandardModel& SM_i)
5269 : ThObservable(SM_i),myTHDM(static_cast<const THDM&> (SM_i))
5270 {}
5271 
5272 double unitaritya11oddIm::computeThValue()
5273 {
5274  double YtQ = myTHDM.getMyTHDMCache()->Ytop_at_Q;
5275  double Yb1Q = myTHDM.getMyTHDMCache()->Ybottom1_at_Q;
5276  double Yb2Q = myTHDM.getMyTHDMCache()->Ybottom2_at_Q;
5277  double Ytau1Q = myTHDM.getMyTHDMCache()->Ytau1_at_Q;
5278  double Ytau2Q = myTHDM.getMyTHDMCache()->Ytau2_at_Q;
5279  double la1Q = myTHDM.getMyTHDMCache()->lambda1_at_Q;
5280  double la2Q = myTHDM.getMyTHDMCache()->lambda2_at_Q;
5281  double la3Q = myTHDM.getMyTHDMCache()->lambda3_at_Q;
5282  double la4Q = myTHDM.getMyTHDMCache()->lambda4_at_Q;
5283  double la5Q = myTHDM.getMyTHDMCache()->lambda5_at_Q;
5284  double WFRc4 = myTHDM.getMyTHDMCache()->WFRcomb4;
5285 
5286  double betalambda3 = 3.0*la1Q*la3Q + 3.0*la2Q*la3Q + 2.0*la3Q*la3Q + la1Q*la4Q + la2Q*la4Q + la4Q*la4Q + la5Q*la5Q
5287  + 3.0*la3Q*Yb1Q*Yb1Q + 3.0*la3Q*Yb2Q*Yb2Q + la3Q*Ytau1Q*Ytau1Q + la3Q*Ytau2Q*Ytau2Q + 3.0*la3Q*YtQ*YtQ
5288  - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q + YtQ*YtQ) - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q;
5289  double betalambda4 = la1Q*la4Q + la2Q*la4Q + 4.0*la3Q*la4Q + 2.0*la4Q*la4Q + 4.0*la5Q*la5Q
5290  + 3.0*la4Q*Yb1Q*Yb1Q + 3.0*la4Q*Yb2Q*Yb2Q + la4Q*Ytau1Q*Ytau1Q + la4Q*Ytau2Q*Ytau2Q + 3.0*la4Q*YtQ*YtQ
5291  - 2.0*Ytau1Q*Ytau1Q*Ytau2Q*Ytau2Q - 6.0*Yb1Q*Yb1Q*(Yb2Q*Yb2Q - YtQ*YtQ);
5292 
5293  double uniNLO24a = -(la3Q+la4Q)/(16.0*M_PI);
5294  double uniNLO24b = 3.0*(betalambda3+betalambda4)/(256.0*M_PI*M_PI*M_PI);
5295  gslpp::complex uniNLO24c = (gslpp::complex::i()*M_PI-1.0)*(la3Q+la4Q)*(la3Q+la4Q)/(256.0*M_PI*M_PI*M_PI);
5296  gslpp::complex uniNLO24d = -2.0*(la3Q+la4Q)/(512.0*M_PI*M_PI*M_PI) * WFRc4;
5297 
5298  return (uniNLO24a+uniNLO24b+uniNLO24c+uniNLO24d).imag();
5299 }
unitarityR12::computeThValue
double computeThValue()
Definition: unitarity.cpp:3700
unitarityNLO18::myTHDM
const THDM & myTHDM
Definition: unitarity.h:622
unitarityRp19::computeThValue
double computeThValue()
Definition: unitarity.cpp:2995
unitaritya11evenpIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2316
unitarityR20::unitarityR20
unitarityR20(const StandardModel &SM_i)
unitarityR20 constructor.
Definition: unitarity.cpp:4156
unitarityR1::unitarityR1
unitarityR1(const StandardModel &SM_i)
unitarityR1 constructor.
Definition: unitarity.cpp:3073
unitarityR10::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1710
unitaritya01evenpIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4644
unitarityR1::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1529
THDMcache::Ytau1_at_Q
double Ytau1_at_Q
Definition: THDMcache.h:2440
unitaritya00evenpIm::unitaritya00evenpIm
unitaritya00evenpIm(const StandardModel &SM_i)
unitaritya00evenpIm constructor.
Definition: unitarity.cpp:4251
unitarityNLOev2::computeThValue
double computeThValue()
Definition: unitarity.cpp:1143
unitarityR15::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1803
unitaritya00oddpRe::unitaritya00oddpRe
unitaritya00oddpRe(const StandardModel &SM_i)
unitaritya00oddpRe constructor.
Definition: unitarity.cpp:4413
unitarityNLOev1::unitarityNLOev1
unitarityNLOev1(const StandardModel &SM_i)
unitarityNLOev1 constructor.
Definition: unitarity.cpp:1085
unitaritya10oddRe::unitaritya10oddRe
unitaritya10oddRe(const StandardModel &SM_i)
unitaritya10oddRe constructor.
Definition: unitarity.cpp:4957
unitarityR6::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1634
unitaritya01oddpRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2169
unitarityRp6::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1246
unitaritya00oddpRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2001
THDM::getsinb
double getsinb() const
A method get .
Definition: THDM.h:291
unitarityRp15::unitarityRp15
unitarityRp15(const StandardModel &SM_i)
unitarityRp15 constructor.
Definition: unitarity.cpp:2751
StandardModel::v
virtual double v() const
The Higgs vacuum expectation value.
Definition: StandardModel.cpp:917
unitaritya01oddmRe::unitaritya01oddmRe
unitaritya01oddmRe(const StandardModel &SM_i)
unitaritya01oddmRe constructor.
Definition: unitarity.cpp:4875
THDMcache::lambda1_at_Q
double lambda1_at_Q
Definition: THDMcache.h:2445
unitarity::unitarity
unitarity(const StandardModel &SM_i)
Constructor.
Definition: unitarity.cpp:12
unitarityNLO5::unitarityNLO5
unitarityNLO5(const StandardModel &SM_i)
unitarityNLO5 constructor.
Definition: unitarity.cpp:423
unitarityR5::computeThValue
double computeThValue()
Definition: unitarity.cpp:3309
unitaritya00evenmRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1959
unitarityR2::computeThValue
double computeThValue()
Definition: unitarity.cpp:3140
unitarityR8::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1668
unitarity2::computeThValue
double computeThValue()
Definition: unitarity.cpp:50
unitarityNLOev13::unitarityNLOev13
unitarityNLOev13(const StandardModel &SM_i)
unitarityNLOev13 constructor.
Definition: unitarity.cpp:1651
unitarityR19::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1875
unitarityNLOev13::computeThValue
double computeThValue()
Definition: unitarity.cpp:1655
unitaritya11evenmRe::unitaritya11evenmRe
unitaritya11evenmRe(const StandardModel &SM_i)
unitaritya11evenmRe constructor.
Definition: unitarity.cpp:5129
unitarityR16::computeThValue
double computeThValue()
Definition: unitarity.cpp:3935
unitarityRp19::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1487
unitaritya11evenpRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2295
unitaritya11evenmIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2358
unitarityNLOev11::computeThValue
double computeThValue()
Definition: unitarity.cpp:1571
unitarity4::unitarity4
unitarity4(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:97
unitarityR5::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1613
unitaritya01oddmIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2232
unitaritya01oddpIm::unitaritya01oddpIm
unitaritya01oddpIm(const StandardModel &SM_i)
unitaritya01oddpIm constructor.
Definition: unitarity.cpp:4834
unitarityR15::unitarityR15
unitarityR15(const StandardModel &SM_i)
unitarityR15 constructor.
Definition: unitarity.cpp:3871
unitarityRp11::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1339
unitarityR18::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1854
unitarityNLO12::unitarityNLO12
unitarityNLO12(const StandardModel &SM_i)
unitarityNLO12 constructor.
Definition: unitarity.cpp:627
unitarityNLO16::unitarityNLO16
unitarityNLO16(const StandardModel &SM_i)
unitarityNLO16 constructor.
Definition: unitarity.cpp:749
unitarityRp12::unitarityRp12
unitarityRp12(const StandardModel &SM_i)
unitarityRp12 constructor.
Definition: unitarity.cpp:2579
unitarityRp10::unitarityRp10
unitarityRp10(const StandardModel &SM_i)
unitarityRp10 constructor.
Definition: unitarity.cpp:2480
unitarityNLO23::unitarityNLO23
unitarityNLO23(const StandardModel &SM_i)
unitarityNLO23 constructor.
Definition: unitarity.cpp:952
unitarityNLO6::computeThValue
double computeThValue()
Definition: unitarity.cpp:457
unitaritya01oddpIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2190
unitarityNLO3::computeThValue
double computeThValue()
Definition: unitarity.cpp:361
unitarityNLO17::unitarityNLO17
unitarityNLO17(const StandardModel &SM_i)
unitarityNLO17 constructor.
Definition: unitarity.cpp:779
unitarityNLO26::unitarityNLO26
unitarityNLO26(const StandardModel &SM_i)
unitarityNLO26 constructor.
Definition: unitarity.cpp:1049
unitarityNLO8::computeThValue
double computeThValue()
Definition: unitarity.cpp:511
unitarityNLO16::myTHDM
const THDM & myTHDM
Definition: unitarity.h:586
unitarityNLO10::unitarityNLO10
unitarityNLO10(const StandardModel &SM_i)
unitarityNLO10 constructor.
Definition: unitarity.cpp:567
unitarityRp5::computeThValue
double computeThValue()
Definition: unitarity.cpp:2199
unitarityNLOev3::myTHDM
const THDM & myTHDM
Definition: unitarity.h:829
unitaritya01evenmIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2148
unitaritya01oddpRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4797
unitarityNLOev10::myTHDM
const THDM & myTHDM
Definition: unitarity.h:970
unitaritya11evenpIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:5080
THDMcache.h
unitarityR16::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1820
unitarityNLO14::myTHDM
const THDM & myTHDM
Definition: unitarity.h:550
unitarityNLO7::computeThValue
double computeThValue()
Definition: unitarity.cpp:483
unitarityRp4::computeThValue
double computeThValue()
Definition: unitarity.cpp:2147
THDMcache::lambda3_at_Q
double lambda3_at_Q
Definition: THDMcache.h:2447
THDMcache::WFRcomb3
double WFRcomb3
Definition: THDMcache.h:2452
unitarityNLOev4::computeThValue
double computeThValue()
Definition: unitarity.cpp:1241
unitarityNLOev16::computeThValue
double computeThValue()
Definition: unitarity.cpp:1812
THDM
A base class for symmetric Two-Higgs-Doublet models.
Definition: THDM.h:120
unitarityNLO13::unitarityNLO13
unitarityNLO13(const StandardModel &SM_i)
unitarityNLO13 constructor.
Definition: unitarity.cpp:657
unitaritya00evenpRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1917
unitarityR3::unitarityR3
unitarityR3(const StandardModel &SM_i)
unitarityR3 constructor.
Definition: unitarity.cpp:3199
unitarityRp5::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1225
unitarityNLOev18::unitarityNLOev18
unitarityNLOev18(const StandardModel &SM_i)
unitarityNLOev18 constructor.
Definition: unitarity.cpp:1912
THDMcache::lambda5_at_Q
double lambda5_at_Q
Definition: THDMcache.h:2449
unitarityNLO5::computeThValue
double computeThValue()
Definition: unitarity.cpp:427
unitarityRp6::unitarityRp6
unitarityRp6(const StandardModel &SM_i)
unitarityRp6 constructor.
Definition: unitarity.cpp:2254
unitarity8::computeThValue
double computeThValue()
Definition: unitarity.cpp:203
unitarityR4::unitarityR4
unitarityR4(const StandardModel &SM_i)
unitarityR4 constructor.
Definition: unitarity.cpp:3252
unitaritya10oddRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4961
unitarityR13::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1765
THDM::getmA2
double getmA2() const
A method get the squared mass of the pseudoscalar Higgs A.
Definition: THDM.h:423
unitarityR17::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1837
unitaritya01evenmIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4746
unitarityNLO20::computeThValue
double computeThValue()
Definition: unitarity.cpp:867
unitarityNLO5::myTHDM
const THDM & myTHDM
Definition: unitarity.h:388
unitarityNLO4::computeThValue
double computeThValue()
Definition: unitarity.cpp:394
unitarityNLO12::myTHDM
const THDM & myTHDM
Definition: unitarity.h:514
unitarityNLOev12::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1006
unitarityNLO6::myTHDM
const THDM & myTHDM
Definition: unitarity.h:406
THDM::gettanb
double gettanb() const
A method get .
Definition: THDM.h:283
unitaritya11evenpRe::unitaritya11evenpRe
unitaritya11evenpRe(const StandardModel &SM_i)
unitaritya11evenpRe constructor.
Definition: unitarity.cpp:5023
unitarity12::computeThValue
double computeThValue()
Definition: unitarity.cpp:286
unitarity10::computeThValue
double computeThValue()
Definition: unitarity.cpp:244
unitaritya01evenmRe::unitaritya01evenmRe
unitaritya01evenmRe(const StandardModel &SM_i)
unitaritya01evenmRe constructor.
Definition: unitarity.cpp:4691
unitaritya00oddpIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2022
unitaritya10oddIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2274
THDM::getm12_2
double getm12_2() const
A method get the parameter of the Higgs potential .
Definition: THDM.h:491
unitarity12::unitarity12
unitarity12(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:282
unitarityRp3::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1183
unitarityNLOev17::unitarityNLOev17
unitarityNLOev17(const StandardModel &SM_i)
unitarityNLOev17 constructor.
Definition: unitarity.cpp:1859
unitarityNLO4::unitarityNLO4
unitarityNLO4(const StandardModel &SM_i)
unitarityNLO4 constructor.
Definition: unitarity.cpp:390
unitaritya01evenpIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2106
unitaritya01evenmRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4695
unitarity7::unitarity7
unitarity7(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:181
THDMcache::Ybottom1_at_Q
double Ybottom1_at_Q
Definition: THDMcache.h:2438
unitarityR19::computeThValue
double computeThValue()
Definition: unitarity.cpp:4119
unitarityRp7::computeThValue
double computeThValue()
Definition: unitarity.cpp:2317
unitarityRp17::unitarityRp17
unitarityRp17(const StandardModel &SM_i)
unitarityRp17 constructor.
Definition: unitarity.cpp:2869
unitarityNLO19::computeThValue
double computeThValue()
Definition: unitarity.cpp:839
gslpp::complex
A class for defining operations on and functions of complex numbers.
Definition: gslpp_complex.h:35
unitaritya00evenmRe::unitaritya00evenmRe
unitaritya00evenmRe(const StandardModel &SM_i)
unitaritya00evenmRe constructor.
Definition: unitarity.cpp:4305
unitarityNLO19::unitarityNLO19
unitarityNLO19(const StandardModel &SM_i)
unitarityNLO19 constructor.
Definition: unitarity.cpp:835
unitarity::computeThValue
double computeThValue()
An empty constructor.
Definition: unitarity.cpp:16
unitarityRp9::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1301
unitarityNLOev11::myTHDM
const THDM & myTHDM
Definition: unitarity.h:988
THDM::getmHp2
double getmHp2() const
A method get the squared charged Higgs mass.
Definition: THDM.h:457
THDMcache::Ytau2_at_Q
double Ytau2_at_Q
Definition: THDMcache.h:2441
unitarityR3::computeThValue
double computeThValue()
Definition: unitarity.cpp:3203
unitarityNLOev5::myTHDM
const THDM & myTHDM
Definition: unitarity.h:871
unitaritya01oddmIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4920
unitarityNLO19::myTHDM
const THDM & myTHDM
Definition: unitarity.h:640
unitaritya11evenmIm::unitaritya11evenmIm
unitaritya11evenmIm(const StandardModel &SM_i)
unitaritya11evenmIm constructor.
Definition: unitarity.cpp:5182
unitaritya00oddmRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2043
unitarityRp18::unitarityRp18
unitarityRp18(const StandardModel &SM_i)
unitarityRp18 constructor.
Definition: unitarity.cpp:2930
unitarityRp16::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1432
unitarityNLO11::myTHDM
const THDM & myTHDM
Definition: unitarity.h:496
unitarityNLOev8::myTHDM
const THDM & myTHDM
Definition: unitarity.h:928
unitarity::myTHDM
const THDM * myTHDM
Definition: unitarity.h:45
unitarityRp17::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1449
unitaritya01oddpRe::unitaritya01oddpRe
unitaritya01oddpRe(const StandardModel &SM_i)
unitaritya01oddpRe constructor.
Definition: unitarity.cpp:4793
unitarityNLOev11::unitarityNLOev11
unitarityNLOev11(const StandardModel &SM_i)
unitarityNLOev11 constructor.
Definition: unitarity.cpp:1567
unitarityR1::computeThValue
double computeThValue()
Definition: unitarity.cpp:3077
THDMcache::Rpeps
double Rpeps
Definition: THDMcache.h:2454
unitarityNLO9::unitarityNLO9
unitarityNLO9(const StandardModel &SM_i)
unitarityNLO9 constructor.
Definition: unitarity.cpp:537
unitaritya00evenmIm::unitaritya00evenmIm
unitaritya00evenmIm(const StandardModel &SM_i)
unitaritya00evenmIm constructor.
Definition: unitarity.cpp:4359
StandardModel
A model class for the Standard Model.
Definition: StandardModel.h:474
unitaritya11evenmRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:5133
THDM::getsina
double getsina() const
A method get .
Definition: THDM.h:331
unitarityNLO18::computeThValue
double computeThValue()
Definition: unitarity.cpp:813
unitarityNLO2::unitarityNLO2
unitarityNLO2(const StandardModel &SM_i)
unitarityNLO2 constructor.
Definition: unitarity.cpp:329
unitarityNLO24::myTHDM
const THDM & myTHDM
Definition: unitarity.h:730
unitarityRp17::computeThValue
double computeThValue()
Definition: unitarity.cpp:2873
THDM::getmHh2
double getmHh2() const
A method get the squared mass of the "non-125 GeV" neutral scalar Higgs.
Definition: THDM.h:365
unitarityRp8::unitarityRp8
unitarityRp8(const StandardModel &SM_i)
unitarityRp8 constructor.
Definition: unitarity.cpp:2372
unitaritya00evenmIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1980
unitarityNLO8::myTHDM
const THDM & myTHDM
Definition: unitarity.h:442
unitarityRp9::unitarityRp9
unitarityRp9(const StandardModel &SM_i)
unitarityRp9 constructor.
Definition: unitarity.cpp:2431
unitarityR9::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1689
unitarityRp3::computeThValue
double computeThValue()
Definition: unitarity.cpp:2095
unitarityNLOev10::computeThValue
double computeThValue()
Definition: unitarity.cpp:1530
unitarityR16::unitarityR16
unitarityR16(const StandardModel &SM_i)
unitarityR16 constructor.
Definition: unitarity.cpp:3931
unitarityNLO10::computeThValue
double computeThValue()
Definition: unitarity.cpp:571
unitaritya11oddIm::unitaritya11oddIm
unitaritya11oddIm(const StandardModel &SM_i)
unitaritya11oddIm constructor.
Definition: unitarity.cpp:5268
unitarityNLOev9::myTHDM
const THDM & myTHDM
Definition: unitarity.h:949
unitarityRp13::unitarityRp13
unitarityRp13(const StandardModel &SM_i)
unitarityRp13 constructor.
Definition: unitarity.cpp:2629
unitarityR12::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1744
unitaritya11oddRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:5239
unitarityNLO25::unitarityNLO25
unitarityNLO25(const StandardModel &SM_i)
unitarityNLO25 constructor.
Definition: unitarity.cpp:1016
unitarityNLO2::myTHDM
const THDM & myTHDM
Definition: unitarity.h:334
unitarityR17::computeThValue
double computeThValue()
Definition: unitarity.cpp:3995
unitarityRp2::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1162
unitarityNLO8::unitarityNLO8
unitarityNLO8(const StandardModel &SM_i)
unitarityNLO8 constructor.
Definition: unitarity.cpp:507
unitarityNLOev1::computeThValue
double computeThValue()
Definition: unitarity.cpp:1089
unitarityRp2::unitarityRp2
unitarityRp2(const StandardModel &SM_i)
unitarityRp2 constructor.
Definition: unitarity.cpp:2029
unitarityRp13::computeThValue
double computeThValue()
Definition: unitarity.cpp:2633
unitarityR10::unitarityR10
unitarityR10(const StandardModel &SM_i)
unitarityR10 constructor.
Definition: unitarity.cpp:3595
unitarityNLOev12::computeThValue
double computeThValue()
Definition: unitarity.cpp:1613
unitarityNLO7::unitarityNLO7
unitarityNLO7(const StandardModel &SM_i)
unitarityNLO7 constructor.
Definition: unitarity.cpp:479
unitarityNLO16::computeThValue
double computeThValue()
Definition: unitarity.cpp:753
unitaritya11evenmRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2337
unitarityNLOev7::unitarityNLOev7
unitarityNLOev7(const StandardModel &SM_i)
unitarityNLOev7 constructor.
Definition: unitarity.cpp:1383
gslpp::complex::imag
const double & imag() const
Definition: gslpp_complex.cpp:59
unitarityR20::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1896
unitarityRp14::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1398
THDMcache::lambda2_at_Q
double lambda2_at_Q
Definition: THDMcache.h:2446
unitarityR20::computeThValue
double computeThValue()
Definition: unitarity.cpp:4160
unitarityNLO6::unitarityNLO6
unitarityNLO6(const StandardModel &SM_i)
unitarityNLO6 constructor.
Definition: unitarity.cpp:453
unitarityNLO13::myTHDM
const THDM & myTHDM
Definition: unitarity.h:532
unitarityNLOev9::computeThValue
double computeThValue()
Definition: unitarity.cpp:1489
unitarityR18::unitarityR18
unitarityR18(const StandardModel &SM_i)
unitarityR18 constructor.
Definition: unitarity.cpp:4053
unitarityRp1::unitarityRp1
unitarityRp1(const StandardModel &SM_i)
unitarityRp1 constructor.
Definition: unitarity.cpp:1967
unitarityR7::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1651
unitarityRp12::computeThValue
double computeThValue()
Definition: unitarity.cpp:2583
unitarity9::unitarity9
unitarity9(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:220
unitaritya00oddmIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4549
unitarity6::unitarity6
unitarity6(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:152
unitarityRp4::unitarityRp4
unitarityRp4(const StandardModel &SM_i)
unitarityRp4 constructor.
Definition: unitarity.cpp:2143
unitarityNLO18::unitarityNLO18
unitarityNLO18(const StandardModel &SM_i)
unitarityNLO18 constructor.
Definition: unitarity.cpp:809
gslpp::complex::abs
double abs() const
Definition: gslpp_complex.cpp:81
unitaritya00oddmIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2064
THDMcache::WFRcomb4
double WFRcomb4
Definition: THDMcache.h:2453
unitarityR8::computeThValue
double computeThValue()
Definition: unitarity.cpp:3489
unitarityRp20::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1508
unitarityNLOev1::myTHDM
const THDM & myTHDM
Definition: unitarity.h:787
unitarityNLOev17::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1102
unitarityNLO7::myTHDM
const THDM & myTHDM
Definition: unitarity.h:424
unitarityRp16::unitarityRp16
unitarityRp16(const StandardModel &SM_i)
unitarityRp16 constructor.
Definition: unitarity.cpp:2810
unitarityNLO23::computeThValue
double computeThValue()
Definition: unitarity.cpp:956
unitaritya01evenpRe::unitaritya01evenpRe
unitaritya01evenpRe(const StandardModel &SM_i)
unitaritya01evenpRe constructor.
Definition: unitarity.cpp:4589
unitarityR2::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1550
unitarityRp10::computeThValue
double computeThValue()
Definition: unitarity.cpp:2484
gslpp::pow
complex pow(const complex &z1, const complex &z2)
Definition: gslpp_complex.cpp:395
unitarityR5::unitarityR5
unitarityR5(const StandardModel &SM_i)
unitarityR5 constructor.
Definition: unitarity.cpp:3305
unitaritya00evenpIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4255
unitaritya11oddRe::unitaritya11oddRe
unitaritya11oddRe(const StandardModel &SM_i)
unitaritya11oddRe constructor.
Definition: unitarity.cpp:5235
gslpp::sqrt
complex sqrt(const complex &z)
Definition: gslpp_complex.cpp:385
unitarityRp1::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1141
gslpp::complex::i
static const complex & i()
Definition: gslpp_complex.cpp:154
unitarityNLO1::myTHDM
const THDM & myTHDM
Definition: unitarity.h:316
unitarityRp9::computeThValue
double computeThValue()
Definition: unitarity.cpp:2435
unitarityR9::computeThValue
double computeThValue()
Definition: unitarity.cpp:3549
unitarityR10::computeThValue
double computeThValue()
Definition: unitarity.cpp:3599
unitarityRp18::computeThValue
double computeThValue()
Definition: unitarity.cpp:2934
unitarityRp4::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1204
unitarityNLO23::myTHDM
const THDM & myTHDM
Definition: unitarity.h:712
unitarityNLOev13::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1027
unitaritya10oddRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2253
unitarityR14::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1786
THDMcache::Ybottom2_at_Q
double Ybottom2_at_Q
Definition: THDMcache.h:2439
unitarityR3::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1571
unitarityRp1::computeThValue
double computeThValue()
Definition: unitarity.cpp:1971
unitarityNLOev8::computeThValue
double computeThValue()
Definition: unitarity.cpp:1438
unitarityNLO21::unitarityNLO21
unitarityNLO21(const StandardModel &SM_i)
unitarityNLO21 constructor.
Definition: unitarity.cpp:893
unitarityR13::unitarityR13
unitarityR13(const StandardModel &SM_i)
unitarityR13 constructor.
Definition: unitarity.cpp:3747
THDMcache::WFRcomb2
double WFRcomb2
Definition: THDMcache.h:2451
unitarityNLO17::computeThValue
double computeThValue()
Definition: unitarity.cpp:783
unitarityR6::computeThValue
double computeThValue()
Definition: unitarity.cpp:3369
unitarityRp2::computeThValue
double computeThValue()
Definition: unitarity.cpp:2033
unitarityNLO10::myTHDM
const THDM & myTHDM
Definition: unitarity.h:478
unitarityR6::unitarityR6
unitarityR6(const StandardModel &SM_i)
unitarityR6 constructor.
Definition: unitarity.cpp:3365
unitarityNLOev15::computeThValue
double computeThValue()
Definition: unitarity.cpp:1761
unitarityR17::unitarityR17
unitarityR17(const StandardModel &SM_i)
unitarityR17 constructor.
Definition: unitarity.cpp:3991
unitarityNLOev7::myTHDM
const THDM & myTHDM
Definition: unitarity.h:910
unitarityNLO17::myTHDM
const THDM & myTHDM
Definition: unitarity.h:604
unitaritya01evenmRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2127
unitarityNLO24::computeThValue
double computeThValue()
Definition: unitarity.cpp:987
unitarityNLOev6::unitarityNLOev6
unitarityNLOev6(const StandardModel &SM_i)
unitarityNLOev6 constructor.
Definition: unitarity.cpp:1332
unitaritya00evenpRe::unitaritya00evenpRe
unitaritya00evenpRe(const StandardModel &SM_i)
unitaritya00evenpRe constructor.
Definition: unitarity.cpp:4197
unitarityR11::unitarityR11
unitarityR11(const StandardModel &SM_i)
unitarityR11 constructor.
Definition: unitarity.cpp:3645
unitarity8::unitarity8
unitarity8(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:199
unitaritya11evenpIm::unitaritya11evenpIm
unitaritya11evenpIm(const StandardModel &SM_i)
unitaritya11evenpIm constructor.
Definition: unitarity.cpp:5076
unitarityR12::unitarityR12
unitarityR12(const StandardModel &SM_i)
unitarityR12 constructor.
Definition: unitarity.cpp:3696
unitarity3::computeThValue
double computeThValue()
Definition: unitarity.cpp:75
unitarityNLO14::computeThValue
double computeThValue()
Definition: unitarity.cpp:691
unitarityNLO9::myTHDM
const THDM & myTHDM
Definition: unitarity.h:460
unitarity10::unitarity10
unitarity10(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:240
unitarityNLOev16::unitarityNLOev16
unitarityNLOev16(const StandardModel &SM_i)
unitarityNLOev16 constructor.
Definition: unitarity.cpp:1808
unitaritya00oddmRe::unitaritya00oddmRe
unitaritya00oddmRe(const StandardModel &SM_i)
unitaritya00oddmRe constructor.
Definition: unitarity.cpp:4501
unitarityNLO15::myTHDM
const THDM & myTHDM
Definition: unitarity.h:568
unitarityNLO26::computeThValue
double computeThValue()
Definition: unitarity.cpp:1053
unitarityNLOev12::unitarityNLOev12
unitarityNLOev12(const StandardModel &SM_i)
unitarityNLOev12 constructor.
Definition: unitarity.cpp:1609
unitarityNLO9::computeThValue
double computeThValue()
Definition: unitarity.cpp:541
unitarityRp10::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1322
unitarityNLOev6::myTHDM
const THDM & myTHDM
Definition: unitarity.h:892
unitarityNLO3::unitarityNLO3
unitarityNLO3(const StandardModel &SM_i)
unitarityNLO3 constructor.
Definition: unitarity.cpp:357
unitarityR11::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1727
unitarityRp16::computeThValue
double computeThValue()
Definition: unitarity.cpp:2814
unitarityRp11::computeThValue
double computeThValue()
Definition: unitarity.cpp:2533
unitarity5::unitarity5
unitarity5(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:123
unitaritya01evenpRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4593
unitarity3::unitarity3
unitarity3(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:71
unitarityR2::unitarityR2
unitarityR2(const StandardModel &SM_i)
unitarityR2 constructor.
Definition: unitarity.cpp:3136
unitarityRp20::computeThValue
double computeThValue()
Definition: unitarity.cpp:3035
unitarityRp15::computeThValue
double computeThValue()
Definition: unitarity.cpp:2755
unitarityRp7::unitarityRp7
unitarityRp7(const StandardModel &SM_i)
unitarityRp7 constructor.
Definition: unitarity.cpp:2313
unitarityNLO4::myTHDM
const THDM & myTHDM
Definition: unitarity.h:370
unitarityNLO21::myTHDM
const THDM & myTHDM
Definition: unitarity.h:676
unitarityNLO25::myTHDM
const THDM & myTHDM
Definition: unitarity.h:748
THDMcache::Ytop_at_Q
double Ytop_at_Q
Definition: THDMcache.h:2437
unitarityRp14::computeThValue
double computeThValue()
Definition: unitarity.cpp:2694
unitarityNLO11::unitarityNLO11
unitarityNLO11(const StandardModel &SM_i)
unitarityNLO11 constructor.
Definition: unitarity.cpp:597
unitarityR18::computeThValue
double computeThValue()
Definition: unitarity.cpp:4057
unitarityNLO20::myTHDM
const THDM & myTHDM
Definition: unitarity.h:658
unitarityNLOev5::unitarityNLOev5
unitarityNLOev5(const StandardModel &SM_i)
unitarityNLOev5 constructor.
Definition: unitarity.cpp:1281
unitarityNLOev16::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1084
unitarityNLO26::myTHDM
const THDM & myTHDM
Definition: unitarity.h:766
unitarity11::computeThValue
double computeThValue()
Definition: unitarity.cpp:265
unitarityNLOev9::unitarityNLOev9
unitarityNLOev9(const StandardModel &SM_i)
unitarityNLOev9 constructor.
Definition: unitarity.cpp:1485
unitarity.h
unitarity1::unitarity1
unitarity1(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:21
unitaritya01evenpRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2085
unitaritya10oddIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4994
unitaritya01oddmRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2211
unitarityNLOev6::computeThValue
double computeThValue()
Definition: unitarity.cpp:1336
unitarityNLO14::unitarityNLO14
unitarityNLO14(const StandardModel &SM_i)
unitarityNLO14 constructor.
Definition: unitarity.cpp:687
unitarityR14::computeThValue
double computeThValue()
Definition: unitarity.cpp:3813
unitarityNLO15::computeThValue
double computeThValue()
Definition: unitarity.cpp:724
unitarityNLO12::computeThValue
double computeThValue()
Definition: unitarity.cpp:631
unitaritya11evenmIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:5186
unitaritya01evenpIm::unitaritya01evenpIm
unitaritya01evenpIm(const StandardModel &SM_i)
unitaritya01evenpIm constructor.
Definition: unitarity.cpp:4640
unitarityNLO3::myTHDM
const THDM & myTHDM
Definition: unitarity.h:352
unitarityRp15::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1415
unitarityRp6::computeThValue
double computeThValue()
Definition: unitarity.cpp:2258
unitarityRp8::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1280
unitarityNLO22::unitarityNLO22
unitarityNLO22(const StandardModel &SM_i)
unitarityNLO22 constructor.
Definition: unitarity.cpp:922
unitaritya00evenpRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4201
ThObservable
A class for a model prediction of an observable.
Definition: ThObservable.h:25
unitarityNLOev7::computeThValue
double computeThValue()
Definition: unitarity.cpp:1387
unitaritya01oddmRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4879
unitaritya10oddIm::unitaritya10oddIm
unitaritya10oddIm(const StandardModel &SM_i)
unitaritya10oddIm constructor.
Definition: unitarity.cpp:4990
THDM::getcosa
double getcosa() const
A method get .
Definition: THDM.h:323
unitarityNLOev15::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1066
unitaritya00oddmRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4505
unitaritya00oddpIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4461
unitaritya01oddpIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4838
unitarityR9::unitarityR9
unitarityR9(const StandardModel &SM_i)
unitarityR9 constructor.
Definition: unitarity.cpp:3545
unitarity6::computeThValue
double computeThValue()
Definition: unitarity.cpp:156
THDM::getmHl2
double getmHl2() const
A method get the squared mass of the lighter neutral scalar Higgs.
Definition: THDM.h:339
unitarityNLO20::unitarityNLO20
unitarityNLO20(const StandardModel &SM_i)
unitarityNLO20 constructor.
Definition: unitarity.cpp:863
unitarityNLO1::computeThValue
double computeThValue()
Definition: unitarity.cpp:307
unitarity7::computeThValue
double computeThValue()
Definition: unitarity.cpp:185
unitarityNLOev5::computeThValue
double computeThValue()
Definition: unitarity.cpp:1285
unitarityRp13::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1377
THDM::getMyTHDMCache
THDMcache * getMyTHDMCache() const
A method get the THDMCache.
Definition: THDM.h:213
unitarityNLOev8::unitarityNLOev8
unitarityNLOev8(const StandardModel &SM_i)
unitarityNLOev8 constructor.
Definition: unitarity.cpp:1434
unitarityRp5::unitarityRp5
unitarityRp5(const StandardModel &SM_i)
unitarityRp5 constructor.
Definition: unitarity.cpp:2195
gslpp::complex::real
const double & real() const
Definition: gslpp_complex.cpp:53
unitarity1::computeThValue
double computeThValue()
Definition: unitarity.cpp:25
unitaritya00oddpIm::unitaritya00oddpIm
unitaritya00oddpIm(const StandardModel &SM_i)
unitaritya00oddpIm constructor.
Definition: unitarity.cpp:4457
unitarityR7::unitarityR7
unitarityR7(const StandardModel &SM_i)
unitarityR7 constructor.
Definition: unitarity.cpp:3425
unitarity2::unitarity2
unitarity2(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:46
unitaritya01evenmIm::unitaritya01evenmIm
unitaritya01evenmIm(const StandardModel &SM_i)
unitaritya01evenmIm constructor.
Definition: unitarity.cpp:4742
unitarityNLO2::computeThValue
double computeThValue()
Definition: unitarity.cpp:333
unitarityNLOev14::computeThValue
double computeThValue()
Definition: unitarity.cpp:1708
unitarityNLOev15::unitarityNLOev15
unitarityNLOev15(const StandardModel &SM_i)
unitarityNLOev15 constructor.
Definition: unitarity.cpp:1757
unitarityRp11::unitarityRp11
unitarityRp11(const StandardModel &SM_i)
unitarityRp11 constructor.
Definition: unitarity.cpp:2529
THDM::getcosb
double getcosb() const
A method get .
Definition: THDM.h:299
unitarityNLOev17::computeThValue
double computeThValue()
Definition: unitarity.cpp:1863
unitarityNLOev18::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1120
unitarityRp19::unitarityRp19
unitarityRp19(const StandardModel &SM_i)
unitarityRp19 constructor.
Definition: unitarity.cpp:2991
unitaritya00evenpIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1938
unitarityNLOev14::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1048
unitarityRp12::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1356
unitarityRp20::unitarityRp20
unitarityRp20(const StandardModel &SM_i)
unitarityRp20 constructor.
Definition: unitarity.cpp:3031
unitarityRp18::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1466
unitaritya11oddIm::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2400
unitarityNLO21::computeThValue
double computeThValue()
Definition: unitarity.cpp:897
unitarityR14::unitarityR14
unitarityR14(const StandardModel &SM_i)
unitarityR14 constructor.
Definition: unitarity.cpp:3809
unitarityNLO11::computeThValue
double computeThValue()
Definition: unitarity.cpp:601
THDMcache::lambda4_at_Q
double lambda4_at_Q
Definition: THDMcache.h:2448
unitaritya11oddRe::myTHDM
const THDM & myTHDM
Definition: unitarity.h:2379
unitarityR4::computeThValue
double computeThValue()
Definition: unitarity.cpp:3256
unitarityNLO15::unitarityNLO15
unitarityNLO15(const StandardModel &SM_i)
unitarityNLO15 constructor.
Definition: unitarity.cpp:720
unitarityNLO1::unitarityNLO1
unitarityNLO1(const StandardModel &SM_i)
unitarityNLO1 constructor.
Definition: unitarity.cpp:303
THDM.h
THDMcache::WFRcomb1
double WFRcomb1
Definition: THDMcache.h:2450
unitarityNLOev4::myTHDM
const THDM & myTHDM
Definition: unitarity.h:850
unitarity11::unitarity11
unitarity11(const StandardModel &SM_i)
Constructor for from equations (9) in .
Definition: unitarity.cpp:261
unitarityNLOev3::computeThValue
double computeThValue()
Definition: unitarity.cpp:1197
unitarityNLO13::computeThValue
double computeThValue()
Definition: unitarity.cpp:661
unitarityNLO22::myTHDM
const THDM & myTHDM
Definition: unitarity.h:694
unitarityRp3::unitarityRp3
unitarityRp3(const StandardModel &SM_i)
unitarityRp3 constructor.
Definition: unitarity.cpp:2091
unitarityR13::computeThValue
double computeThValue()
Definition: unitarity.cpp:3751
unitarityNLOev3::unitarityNLOev3
unitarityNLOev3(const StandardModel &SM_i)
unitarityNLOev3 constructor.
Definition: unitarity.cpp:1193
unitarityR15::computeThValue
double computeThValue()
Definition: unitarity.cpp:3875
unitaritya01oddmIm::unitaritya01oddmIm
unitaritya01oddmIm(const StandardModel &SM_i)
unitaritya01oddmIm constructor.
Definition: unitarity.cpp:4916
unitarityR4::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1592
unitarityR19::unitarityR19
unitarityR19(const StandardModel &SM_i)
unitarityR19 constructor.
Definition: unitarity.cpp:4115
unitarityNLO22::computeThValue
double computeThValue()
Definition: unitarity.cpp:926
unitaritya00oddmIm::unitaritya00oddmIm
unitaritya00oddmIm(const StandardModel &SM_i)
unitaritya00oddmIm constructor.
Definition: unitarity.cpp:4545
unitarityNLOev10::unitarityNLOev10
unitarityNLOev10(const StandardModel &SM_i)
unitarityNLOev10 constructor.
Definition: unitarity.cpp:1526
unitaritya00oddpRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4417
unitarityR8::unitarityR8
unitarityR8(const StandardModel &SM_i)
unitarityR8 constructor.
Definition: unitarity.cpp:3485
unitarityR7::computeThValue
double computeThValue()
Definition: unitarity.cpp:3429
unitarityRp8::computeThValue
double computeThValue()
Definition: unitarity.cpp:2376
unitarityNLOev2::unitarityNLOev2
unitarityNLOev2(const StandardModel &SM_i)
unitarityNLOev2 constructor.
Definition: unitarity.cpp:1139
unitarityNLO25::computeThValue
double computeThValue()
Definition: unitarity.cpp:1020
unitaritya11evenpRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:5027
unitarityNLOev14::unitarityNLOev14
unitarityNLOev14(const StandardModel &SM_i)
unitarityNLOev14 constructor.
Definition: unitarity.cpp:1704
unitarityR11::computeThValue
double computeThValue()
Definition: unitarity.cpp:3649
unitarityNLOev18::computeThValue
double computeThValue()
Definition: unitarity.cpp:1916
unitarityRp14::unitarityRp14
unitarityRp14(const StandardModel &SM_i)
unitarityRp14 constructor.
Definition: unitarity.cpp:2690
unitaritya00evenmRe::computeThValue
double computeThValue()
Definition: unitarity.cpp:4309
unitarityNLOev2::myTHDM
const THDM & myTHDM
Definition: unitarity.h:808
unitarityRp7::myTHDM
const THDM & myTHDM
Definition: unitarity.h:1263
unitarity9::computeThValue
double computeThValue()
Definition: unitarity.cpp:224
unitarityNLOev4::unitarityNLOev4
unitarityNLOev4(const StandardModel &SM_i)
unitarityNLOev4 constructor.
Definition: unitarity.cpp:1237
unitarity4::computeThValue
double computeThValue()
Definition: unitarity.cpp:101
unitarityNLO24::unitarityNLO24
unitarityNLO24(const StandardModel &SM_i)
unitarityNLO24 constructor.
Definition: unitarity.cpp:983
unitarity
An observable class for the requirement of tree level perturbative unitarity.
Definition: unitarity.h:31
unitaritya00evenmIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:4363
unitarity5::computeThValue
double computeThValue()
Definition: unitarity.cpp:127
unitaritya11oddIm::computeThValue
double computeThValue()
Definition: unitarity.cpp:5272