flexiblesusy is hosted by Hepforge, IPPP Durham
FlexibleSUSY
one_loop_decay_diagrams.cpp
Go to the documentation of this file.
1// ====================================================================
2// This file is part of FlexibleSUSY.
3//
4// FlexibleSUSY is free software: you can redistribute it and/or modify
5// it under the terms of the GNU General Public License as published
6// by the Free Software Foundation, either version 3 of the License,
7// or (at your option) any later version.
8//
9// FlexibleSUSY is distributed in the hope that it will be useful, but
10// WITHOUT ANY WARRANTY; without even the implied warranty of
11// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12// General Public License for more details.
13//
14// You should have received a copy of the GNU General Public License
15// along with FlexibleSUSY. If not, see
16// <http://www.gnu.org/licenses/>.
17// ====================================================================
18
19#include "one_loop_decay_diagrams.hpp"
20#include "wrappers.hpp"
21#include "loop_libraries/loop_library.hpp"
22
23namespace flexiblesusy {
24
25namespace {
26
27inline double Den(double x2, double y2) {
28 return 1.0/(x2-y2);
29}
30
31} // anonymous
32
51Decay_amplitude_SSS calculate_diagram_SSS_t1g1n1_FFF(
52 double mext1, double mext2, double mext3,
53 double mLF4, double mLF5, double mLF6,
54 const std::complex<double>& CpcF4cF5S1PL, const std::complex<double>&
55 CpcF4cF5S1PR, const std::complex<double>& CpF5F6S3PL, const std::complex<
56 double>& CpF5F6S3PR, const std::complex<double>& CpcF6F4S2PL, const std::
57 complex<double>& CpcF6F4S2PR,
58 double scale)
59{
60 auto& lib = Loop_library::get();
61
62 looplibrary::Bcoeff_t B_coeffs;
63 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
64
65 looplibrary::Ccoeff_t C_coeffs;
66 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLF4*mLF4, mLF6*mLF6,
67 mLF5*mLF5, scale*scale);
68
69 const auto b0tmp1 = B_coeffs.at(0);
70 const auto c0tmp2 = C_coeffs.at(0);
71 const auto c1tmp3 = C_coeffs.at(1);
72 const auto c2tmp4 = C_coeffs.at(2);
73
74 Decay_amplitude_SSS result;
75
76 result.m_decay = mext1;
77 result.m_scalar_1 = mext2;
78 result.m_scalar_2 = mext3;
79
80 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(2*b0tmp1*(
81 CpcF4cF5S1PR*(CpcF6F4S2PR*CpF5F6S3PL*mLF4 + CpcF6F4S2PL*CpF5F6S3PR*mLF5 +
82 CpcF6F4S2PL*CpF5F6S3PL*mLF6) + CpcF4cF5S1PL*(CpcF6F4S2PL*CpF5F6S3PR*mLF4
83 + CpcF6F4S2PR*CpF5F6S3PL*mLF5 + CpcF6F4S2PR*CpF5F6S3PR*mLF6)) + c1tmp3*
84 CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6S3PL*mLF4*Sqr(mext1) + 3*c2tmp4*
85 CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6S3PL*mLF4*Sqr(mext1) + c1tmp3*CpcF4cF5S1PL
86 *CpcF6F4S2PL*CpF5F6S3PR*mLF4*Sqr(mext1) + 3*c2tmp4*CpcF4cF5S1PL*
87 CpcF6F4S2PL*CpF5F6S3PR*mLF4*Sqr(mext1) + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*
88 CpF5F6S3PL*mLF5*Sqr(mext1) + c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PR*
89 mLF5*Sqr(mext1) + c1tmp3*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PL*mLF6*Sqr(
90 mext1) + 2*c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PL*mLF6*Sqr(mext1) +
91 c1tmp3*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PR*mLF6*Sqr(mext1) + 2*c2tmp4*
92 CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PR*mLF6*Sqr(mext1) + 3*c1tmp3*
93 CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6S3PL*mLF4*Sqr(mext2) + c2tmp4*CpcF4cF5S1PR
94 *CpcF6F4S2PR*CpF5F6S3PL*mLF4*Sqr(mext2) + 3*c1tmp3*CpcF4cF5S1PL*
95 CpcF6F4S2PL*CpF5F6S3PR*mLF4*Sqr(mext2) + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PL*
96 CpF5F6S3PR*mLF4*Sqr(mext2) + 2*c1tmp3*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PL
97 *mLF5*Sqr(mext2) + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PL*mLF5*Sqr(
98 mext2) + 2*c1tmp3*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PR*mLF5*Sqr(mext2) +
99 c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PR*mLF5*Sqr(mext2) + c1tmp3*
100 CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PL*mLF6*Sqr(mext2) + c1tmp3*CpcF4cF5S1PL
101 *CpcF6F4S2PR*CpF5F6S3PR*mLF6*Sqr(mext2) - c1tmp3*CpcF4cF5S1PR*CpcF6F4S2PR
102 *CpF5F6S3PL*mLF4*Sqr(mext3) - c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6S3PL*
103 mLF4*Sqr(mext3) - c1tmp3*CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6S3PR*mLF4*Sqr(
104 mext3) - c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6S3PR*mLF4*Sqr(mext3) -
105 c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PL*mLF5*Sqr(mext3) - c2tmp4*
106 CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6S3PR*mLF5*Sqr(mext3) - c1tmp3*CpcF4cF5S1PR
107 *CpcF6F4S2PL*CpF5F6S3PL*mLF6*Sqr(mext3) - c1tmp3*CpcF4cF5S1PL*CpcF6F4S2PR
108 *CpF5F6S3PR*mLF6*Sqr(mext3) + c0tmp2*mLF4*(2*(CpcF4cF5S1PR*CpcF6F4S2PL*
109 CpF5F6S3PL + CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6S3PR)*mLF4*mLF6 + 2*mLF5*(
110 CpcF4cF5S1PL*CpF5F6S3PL*(CpcF6F4S2PR*mLF4 + CpcF6F4S2PL*mLF6) +
111 CpcF4cF5S1PR*CpF5F6S3PR*(CpcF6F4S2PL*mLF4 + CpcF6F4S2PR*mLF6)) + (
112 CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6S3PL + CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6S3PR
113 )*(Sqr(mext1) + Sqr(mext2) - Sqr(mext3)) + 2*(CpcF4cF5S1PR*CpcF6F4S2PR*
114 CpF5F6S3PL + CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6S3PR)*Sqr(mLF4))));
115
116 return result;
117}
118
134Decay_amplitude_SSS calculate_diagram_SSS_t1g2n2_SSS(
135 double mext1, double mext2, double mext3,
136 double mLS4, double mLS5, double mLS6,
137 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
138 CpS2S4cS6, const std::complex<double>& CpS3S5S6,
139 double scale)
140{
141 auto& lib = Loop_library::get();
142
143 looplibrary::Ccoeff_t C_coeffs;
144 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
145 mLS5*mLS5, scale*scale);
146
147 const auto c0tmp1 = C_coeffs.at(0);
148
149 Decay_amplitude_SSS result;
150
151 result.m_decay = mext1;
152 result.m_scalar_1 = mext2;
153 result.m_scalar_2 = mext3;
154
155 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*c0tmp1*
156 CpS1cS4cS5*CpS2S4cS6*CpS3S5S6);
157
158 return result;
159}
160
176Decay_amplitude_SSS calculate_diagram_SSS_t1g3n3_UUU(
177 double mext1, double mext2, double mext3,
178 double mLU4, double mLU5, double mLU6,
179 const std::complex<double>& CpS1cU4cU5, const std::complex<double>&
180 CpS2cU6U4, const std::complex<double>& CpS3U5U6,
181 double scale)
182{
183 auto& lib = Loop_library::get();
184
185 looplibrary::Ccoeff_t C_coeffs;
186 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLU4*mLU4, mLU6*mLU6,
187 mLU5*mLU5, scale*scale);
188
189 const auto c0tmp1 = C_coeffs.at(0);
190
191 Decay_amplitude_SSS result;
192
193 result.m_decay = mext1;
194 result.m_scalar_1 = mext2;
195 result.m_scalar_2 = mext3;
196
197 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*c0tmp1*
198 CpS1cU4cU5*CpS2cU6U4*CpS3U5U6);
199
200 return result;
201}
202
218Decay_amplitude_SSS calculate_diagram_SSS_t1g4n4_SSV(
219 double mext1, double mext2, double mext3,
220 double mLS4, double mLS5, double mLV6,
221 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
222 CpS2S4cV6, const std::complex<double>& CpS3S5V6,
223 double scale)
224{
225 auto& lib = Loop_library::get();
226
227 looplibrary::Bcoeff_t B_coeffs;
228 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
229
230 looplibrary::Ccoeff_t C_coeffs;
231 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
232 mLS5*mLS5, scale*scale);
233
234 const auto b0tmp1 = B_coeffs.at(0);
235 const auto c0tmp2 = C_coeffs.at(0);
236 const auto c1tmp3 = C_coeffs.at(1);
237 const auto c2tmp4 = C_coeffs.at(2);
238
239 Decay_amplitude_SSS result;
240
241 result.m_decay = mext1;
242 result.m_scalar_1 = mext2;
243 result.m_scalar_2 = mext3;
244
245 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1cS4cS5*
246 CpS2S4cV6*CpS3S5V6*(b0tmp1 + c1tmp3*Sqr(mext1) + c2tmp4*Sqr(mext1) -
247 c1tmp3*Sqr(mext2) - c2tmp4*Sqr(mext2) - c1tmp3*Sqr(mext3) + c2tmp4*Sqr(
248 mext3) + c0tmp2*(-Sqr(mext1) + Sqr(mext3) + Sqr(mLS4))));
249
250 return result;
251}
252
269Decay_amplitude_SSS calculate_diagram_SSS_t1g5n5_SVS(
270 double mext1, double mext2, double mext3,
271 double mLS4, double mLV5, double mLS6,
272 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
273 CpS2S4cS6, const std::complex<double>& CpS3S6V5,
274 double scale)
275{
276 auto& lib = Loop_library::get();
277
278 looplibrary::Bcoeff_t B_coeffs;
279 lib.B(B_coeffs, mext3*mext3, mLS6*mLS6, mLV5*mLV5, scale*scale);
280
281 looplibrary::Ccoeff_t C_coeffs;
282 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
283 mLV5*mLV5, scale*scale);
284
285 const auto b0tmp1 = B_coeffs.at(0);
286 const auto c0tmp2 = C_coeffs.at(0);
287 const auto c1tmp3 = C_coeffs.at(1);
288 const auto c2tmp4 = C_coeffs.at(2);
289
290 Decay_amplitude_SSS result;
291
292 result.m_decay = mext1;
293 result.m_scalar_1 = mext2;
294 result.m_scalar_2 = mext3;
295
296 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1cS4cV5*
297 CpS2S4cS6*CpS3S6V5*(b0tmp1 - c2tmp4*Sqr(mext1) - c0tmp2*Sqr(mext2) +
298 c2tmp4*Sqr(mext2) + c0tmp2*Sqr(mext3) - c2tmp4*Sqr(mext3) + c1tmp3*(-Sqr(
299 mext1) + Sqr(mext2) + Sqr(mext3)) + c0tmp2*Sqr(mLS4)));
300
301 return result;
302}
303
320Decay_amplitude_SSS calculate_diagram_SSS_t1g6n6_VSS(
321 double mext1, double mext2, double mext3,
322 double mLV4, double mLS5, double mLS6,
323 const std::complex<double>& CpS1cS5cV4, const std::complex<double>&
324 CpS2cS6V4, const std::complex<double>& CpS3S5S6,
325 double scale)
326{
327 auto& lib = Loop_library::get();
328
329 looplibrary::Bcoeff_t B_coeffs;
330 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLS6*mLS6, scale*scale);
331
332 looplibrary::Ccoeff_t C_coeffs;
333 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
334 mLS5*mLS5, scale*scale);
335
336 const auto b0tmp1 = B_coeffs.at(0);
337 const auto c0tmp2 = C_coeffs.at(0);
338 const auto c1tmp3 = C_coeffs.at(1);
339 const auto c2tmp4 = C_coeffs.at(2);
340
341 Decay_amplitude_SSS result;
342
343 result.m_decay = mext1;
344 result.m_scalar_1 = mext2;
345 result.m_scalar_2 = mext3;
346
347 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1cS5cV4*
348 CpS2cS6V4*CpS3S5S6*(b0tmp1 + c1tmp3*Sqr(mext1) + 3*c2tmp4*Sqr(mext1) + 3*
349 c1tmp3*Sqr(mext2) + c2tmp4*Sqr(mext2) - c1tmp3*Sqr(mext3) - c2tmp4*Sqr(
350 mext3) + c0tmp2*(2*(Sqr(mext1) + Sqr(mext2) - Sqr(mext3)) + Sqr(mLV4))));
351
352 return result;
353}
354
371Decay_amplitude_SSS calculate_diagram_SSS_t1g7n7_SVV(
372 double mext1, double mext2, double mext3,
373 double mLS4, double mLV5, double mLV6,
374 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
375 CpS2S4cV6, const std::complex<double>& CpS3V5V6,
376 double scale)
377{
378 auto& lib = Loop_library::get();
379
380 looplibrary::Bcoeff_t B_coeffs;
381 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
382
383 looplibrary::Ccoeff_t C_coeffs;
384 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
385 mLV5*mLV5, scale*scale);
386
387 const auto b0tmp1 = B_coeffs.at(0);
388 const auto c0tmp2 = C_coeffs.at(0);
389 const auto c1tmp3 = C_coeffs.at(1);
390 const auto c2tmp4 = C_coeffs.at(2);
391
392 Decay_amplitude_SSS result;
393
394 result.m_decay = mext1;
395 result.m_scalar_1 = mext2;
396 result.m_scalar_2 = mext3;
397
398 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*CpS1cS4cV5*
399 CpS2S4cV6*CpS3V5V6*(2*b0tmp1 - c1tmp3*Sqr(mext1) - 3*c2tmp4*Sqr(mext1) -
400 3*c1tmp3*Sqr(mext2) - c2tmp4*Sqr(mext2) + c1tmp3*Sqr(mext3) + c2tmp4*Sqr(
401 mext3) + c0tmp2*(Sqr(mext1) + Sqr(mext2) - Sqr(mext3) + 2*Sqr(mLS4))));
402
403 return result;
404}
405
422Decay_amplitude_SSS calculate_diagram_SSS_t1g8n8_VSV(
423 double mext1, double mext2, double mext3,
424 double mLV4, double mLS5, double mLV6,
425 const std::complex<double>& CpS1cS5cV4, const std::complex<double>&
426 CpS2V4cV6, const std::complex<double>& CpS3S5V6,
427 double scale)
428{
429 auto& lib = Loop_library::get();
430
431 looplibrary::Bcoeff_t B_coeffs;
432 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
433
434 looplibrary::Ccoeff_t C_coeffs;
435 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
436 mLS5*mLS5, scale*scale);
437
438 const auto b0tmp1 = B_coeffs.at(0);
439 const auto c0tmp2 = C_coeffs.at(0);
440 const auto c1tmp3 = C_coeffs.at(1);
441 const auto c2tmp4 = C_coeffs.at(2);
442
443 Decay_amplitude_SSS result;
444
445 result.m_decay = mext1;
446 result.m_scalar_1 = mext2;
447 result.m_scalar_2 = mext3;
448
449 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*CpS1cS5cV4*
450 CpS2V4cV6*CpS3S5V6*(2*b0tmp1 + 4*c1tmp3*Sqr(mext1) + 7*c2tmp4*Sqr(mext1)
451 + 2*c1tmp3*Sqr(mext2) - c2tmp4*Sqr(mext2) - 4*c1tmp3*Sqr(mext3) + c2tmp4*
452 Sqr(mext3) + 2*c0tmp2*(3*Sqr(mext1) - Sqr(mext2) + Sqr(mext3) + Sqr(mLV4)
453 )));
454
455 return result;
456}
457
473Decay_amplitude_SSS calculate_diagram_SSS_t1g9n9_VVS(
474 double mext1, double mext2, double mext3,
475 double mLV4, double mLV5, double mLS6,
476 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
477 CpS2cS6V4, const std::complex<double>& CpS3S6V5,
478 double scale)
479{
480 auto& lib = Loop_library::get();
481
482 looplibrary::Bcoeff_t B_coeffs;
483 lib.B(B_coeffs, mext3*mext3, mLS6*mLS6, mLV5*mLV5, scale*scale);
484
485 looplibrary::Ccoeff_t C_coeffs;
486 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
487 mLV5*mLV5, scale*scale);
488
489 const auto b0tmp1 = B_coeffs.at(0);
490 const auto c0tmp2 = C_coeffs.at(0);
491 const auto c1tmp3 = C_coeffs.at(1);
492 const auto c2tmp4 = C_coeffs.at(2);
493
494 Decay_amplitude_SSS result;
495
496 result.m_decay = mext1;
497 result.m_scalar_1 = mext2;
498 result.m_scalar_2 = mext3;
499
500 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*CpS1cV4cV5*
501 CpS2cS6V4*CpS3S6V5*(2*b0tmp1 - c1tmp3*Sqr(mext1) + 2*c2tmp4*Sqr(mext1) +
502 7*c1tmp3*Sqr(mext2) + 4*c2tmp4*Sqr(mext2) + c1tmp3*Sqr(mext3) - 4*c2tmp4*
503 Sqr(mext3) + 2*c0tmp2*(-Sqr(mext1) + 3*Sqr(mext2) + Sqr(mext3) + Sqr(mLV4
504 ))));
505
506 return result;
507}
508
524Decay_amplitude_SSS calculate_diagram_SSS_t1g10n10_VVV(
525 double mext1, double mext2, double mext3,
526 double mLV4, double mLV5, double mLV6,
527 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
528 CpS2V4cV6, const std::complex<double>& CpS3V5V6,
529 double scale)
530{
531 auto& lib = Loop_library::get();
532
533 looplibrary::Ccoeff_t C_coeffs;
534 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
535 mLV5*mLV5, scale*scale);
536
537 const auto c0tmp1 = C_coeffs.at(0);
538
539 Decay_amplitude_SSS result;
540
541 result.m_decay = mext1;
542 result.m_scalar_1 = mext2;
543 result.m_scalar_2 = mext3;
544
545 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,4)*c0tmp1*
546 CpS1cV4cV5*CpS2V4cV6*CpS3V5V6);
547
548 return result;
549}
550
564Decay_amplitude_SSS calculate_diagram_SSS_t2g1n11_SS(
565 double mext1, double mext2, double mext3,
566 double mIS4, double mLS5,
567 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
568 CpS3S4cS5S5,
569 double scale)
570{
571 auto& lib = Loop_library::get();
572
573 looplibrary::Acoeff_t A_coeffs;
574 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
575
576 const auto a0tmp1 = A_coeffs.at(0);
577
578 Decay_amplitude_SSS result;
579
580 result.m_decay = mext1;
581 result.m_scalar_1 = mext2;
582 result.m_scalar_2 = mext3;
583
584 result.form_factor = oneOver16PiSqr*(-0.5*a0tmp1*CpS1S2cS4*CpS3S4cS5S5*Den(
585 Sqr(mext3),Sqr(mIS4)));
586
587 return result;
588}
589
603Decay_amplitude_SSS calculate_diagram_SSS_t2g2n12_SV(
604 double mext1, double mext2, double mext3,
605 double mIS4, double mLV5,
606 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
607 CpS3S4cV5V5,
608 double scale, double finite)
609{
610 auto& lib = Loop_library::get();
611
612 looplibrary::Acoeff_t A_coeffs;
613 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
614
615 const auto a0tmp1 = A_coeffs.at(0);
616
617 Decay_amplitude_SSS result;
618
619 result.m_decay = mext1;
620 result.m_scalar_1 = mext2;
621 result.m_scalar_2 = mext3;
622
623 result.form_factor = oneOver16PiSqr*(CpS1S2cS4*CpS3S4cV5V5*Den(Sqr(mext3),
624 Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
625
626 return result;
627}
628
642Decay_amplitude_SSS calculate_diagram_SSS_t3g1n13_SS(
643 double mext1, double mext2, double mext3,
644 double mIS4, double mLS5,
645 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
646 CpS2S4cS5S5,
647 double scale)
648{
649 auto& lib = Loop_library::get();
650
651 looplibrary::Acoeff_t A_coeffs;
652 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
653
654 const auto a0tmp1 = A_coeffs.at(0);
655
656 Decay_amplitude_SSS result;
657
658 result.m_decay = mext1;
659 result.m_scalar_1 = mext2;
660 result.m_scalar_2 = mext3;
661
662 result.form_factor = oneOver16PiSqr*(-0.5*a0tmp1*CpS1S3cS4*CpS2S4cS5S5*Den(
663 Sqr(mext2),Sqr(mIS4)));
664
665 return result;
666}
667
681Decay_amplitude_SSS calculate_diagram_SSS_t3g2n14_SV(
682 double mext1, double mext2, double mext3,
683 double mIS4, double mLV5,
684 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
685 CpS2S4cV5V5,
686 double scale, double finite)
687{
688 auto& lib = Loop_library::get();
689
690 looplibrary::Acoeff_t A_coeffs;
691 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
692
693 const auto a0tmp1 = A_coeffs.at(0);
694
695 Decay_amplitude_SSS result;
696
697 result.m_decay = mext1;
698 result.m_scalar_1 = mext2;
699 result.m_scalar_2 = mext3;
700
701 result.form_factor = oneOver16PiSqr*(CpS1S3cS4*CpS2S4cV5V5*Den(Sqr(mext2),
702 Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
703
704 return result;
705}
706
720Decay_amplitude_SSS calculate_diagram_SSS_t4g1n15_SS(
721 double mext1, double mext2, double mext3,
722 double mLS4, double mLS5,
723 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
724 CpS2S3S4S5,
725 double scale)
726{
727 auto& lib = Loop_library::get();
728
729 looplibrary::Bcoeff_t B_coeffs;
730 lib.B(B_coeffs, mext1*mext1, mLS4*mLS4, mLS5*mLS5, scale*scale);
731
732 const auto b0tmp1 = B_coeffs.at(0);
733
734 Decay_amplitude_SSS result;
735
736 result.m_decay = mext1;
737 result.m_scalar_1 = mext2;
738 result.m_scalar_2 = mext3;
739
740 result.form_factor = oneOver16PiSqr*(-0.5*b0tmp1*CpS1cS4cS5*CpS2S3S4S5);
741
742 return result;
743}
744
758Decay_amplitude_SSS calculate_diagram_SSS_t4g2n16_VV(
759 double mext1, double mext2, double mext3,
760 double mLV4, double mLV5,
761 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
762 CpS2S3V4V5,
763 double scale, double finite)
764{
765 auto& lib = Loop_library::get();
766
767 looplibrary::Bcoeff_t B_coeffs;
768 lib.B(B_coeffs, mext1*mext1, mLV4*mLV4, mLV5*mLV5, scale*scale);
769
770 const auto b0tmp1 = B_coeffs.at(0);
771
772 Decay_amplitude_SSS result;
773
774 result.m_decay = mext1;
775 result.m_scalar_1 = mext2;
776 result.m_scalar_2 = mext3;
777
778 result.form_factor = oneOver16PiSqr*(CpS1cV4cV5*CpS2S3V4V5*(-2*b0tmp1 +
779 finite));
780
781 return result;
782}
783
797Decay_amplitude_SSS calculate_diagram_SSS_t5g1n17_SS(
798 double mext1, double mext2, double mext3,
799 double mIS4, double mLS5,
800 const std::complex<double>& CpS2S3cS4, const std::complex<double>&
801 CpS1S4cS5S5,
802 double scale)
803{
804 auto& lib = Loop_library::get();
805
806 looplibrary::Acoeff_t A_coeffs;
807 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
808
809 const auto a0tmp1 = A_coeffs.at(0);
810
811 Decay_amplitude_SSS result;
812
813 result.m_decay = mext1;
814 result.m_scalar_1 = mext2;
815 result.m_scalar_2 = mext3;
816
817 result.form_factor = oneOver16PiSqr*(-0.5*a0tmp1*CpS1S4cS5S5*CpS2S3cS4*Den(
818 Sqr(mext1),Sqr(mIS4)));
819
820 return result;
821}
822
836Decay_amplitude_SSS calculate_diagram_SSS_t5g2n18_SV(
837 double mext1, double mext2, double mext3,
838 double mIS4, double mLV5,
839 const std::complex<double>& CpS2S3cS4, const std::complex<double>&
840 CpS1S4cV5V5,
841 double scale, double finite)
842{
843 auto& lib = Loop_library::get();
844
845 looplibrary::Acoeff_t A_coeffs;
846 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
847
848 const auto a0tmp1 = A_coeffs.at(0);
849
850 Decay_amplitude_SSS result;
851
852 result.m_decay = mext1;
853 result.m_scalar_1 = mext2;
854 result.m_scalar_2 = mext3;
855
856 result.form_factor = oneOver16PiSqr*(CpS1S4cV5V5*CpS2S3cS4*Den(Sqr(mext1),
857 Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
858
859 return result;
860}
861
875Decay_amplitude_SSS calculate_diagram_SSS_t6g1n19_SS(
876 double mext1, double mext2, double mext3,
877 double mLS4, double mLS5,
878 const std::complex<double>& CpS2cS4cS5, const std::complex<double>&
879 CpS1S3S4S5,
880 double scale)
881{
882 auto& lib = Loop_library::get();
883
884 looplibrary::Bcoeff_t B_coeffs;
885 lib.B(B_coeffs, mext2*mext2, mLS4*mLS4, mLS5*mLS5, scale*scale);
886
887 const auto b0tmp1 = B_coeffs.at(0);
888
889 Decay_amplitude_SSS result;
890
891 result.m_decay = mext1;
892 result.m_scalar_1 = mext2;
893 result.m_scalar_2 = mext3;
894
895 result.form_factor = oneOver16PiSqr*(-0.5*b0tmp1*CpS1S3S4S5*CpS2cS4cS5);
896
897 return result;
898}
899
913Decay_amplitude_SSS calculate_diagram_SSS_t6g2n20_VV(
914 double mext1, double mext2, double mext3,
915 double mLV4, double mLV5,
916 const std::complex<double>& CpS2cV4cV5, const std::complex<double>&
917 CpS1S3V4V5,
918 double scale, double finite)
919{
920 auto& lib = Loop_library::get();
921
922 looplibrary::Bcoeff_t B_coeffs;
923 lib.B(B_coeffs, mext2*mext2, mLV4*mLV4, mLV5*mLV5, scale*scale);
924
925 const auto b0tmp1 = B_coeffs.at(0);
926
927 Decay_amplitude_SSS result;
928
929 result.m_decay = mext1;
930 result.m_scalar_1 = mext2;
931 result.m_scalar_2 = mext3;
932
933 result.form_factor = oneOver16PiSqr*(CpS1S3V4V5*CpS2cV4cV5*(-2*b0tmp1 +
934 finite));
935
936 return result;
937}
938
952Decay_amplitude_SSS calculate_diagram_SSS_t7g1n21_SS(
953 double mext1, double mext2, double mext3,
954 double mLS4, double mLS5,
955 const std::complex<double>& CpS3cS4cS5, const std::complex<double>&
956 CpS1S2S4S5,
957 double scale)
958{
959 auto& lib = Loop_library::get();
960
961 looplibrary::Bcoeff_t B_coeffs;
962 lib.B(B_coeffs, mext3*mext3, mLS4*mLS4, mLS5*mLS5, scale*scale);
963
964 const auto b0tmp1 = B_coeffs.at(0);
965
966 Decay_amplitude_SSS result;
967
968 result.m_decay = mext1;
969 result.m_scalar_1 = mext2;
970 result.m_scalar_2 = mext3;
971
972 result.form_factor = oneOver16PiSqr*(-0.5*b0tmp1*CpS1S2S4S5*CpS3cS4cS5);
973
974 return result;
975}
976
990Decay_amplitude_SSS calculate_diagram_SSS_t7g2n22_VV(
991 double mext1, double mext2, double mext3,
992 double mLV4, double mLV5,
993 const std::complex<double>& CpS3cV4cV5, const std::complex<double>&
994 CpS1S2V4V5,
995 double scale, double finite)
996{
997 auto& lib = Loop_library::get();
998
999 looplibrary::Bcoeff_t B_coeffs;
1000 lib.B(B_coeffs, mext3*mext3, mLV4*mLV4, mLV5*mLV5, scale*scale);
1001
1002 const auto b0tmp1 = B_coeffs.at(0);
1003
1004 Decay_amplitude_SSS result;
1005
1006 result.m_decay = mext1;
1007 result.m_scalar_1 = mext2;
1008 result.m_scalar_2 = mext3;
1009
1010 result.form_factor = oneOver16PiSqr*(CpS1S2V4V5*CpS3cV4cV5*(-2*b0tmp1 +
1011 finite));
1012
1013 return result;
1014}
1015
1033Decay_amplitude_SSS calculate_diagram_SSS_t8g1n23_SFF(
1034 double mext1, double mext2, double mext3,
1035 double mIS4, double mLF5, double mLF6,
1036 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
1037 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S3PL, const std::complex<
1038 double>& CpcF6cF5S3PR, const std::complex<double>& CpS1S2cS4,
1039 double scale)
1040{
1041 auto& lib = Loop_library::get();
1042
1043 looplibrary::Acoeff_t A_coeffs;
1044 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
1045
1046 looplibrary::Bcoeff_t B_coeffs;
1047 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
1048
1049 const auto a0tmp1 = A_coeffs.at(0);
1050 const auto b0tmp2 = B_coeffs.at(0);
1051 const auto b1tmp3 = B_coeffs.at(1);
1052
1053 Decay_amplitude_SSS result;
1054
1055 result.m_decay = mext1;
1056 result.m_scalar_1 = mext2;
1057 result.m_scalar_2 = mext3;
1058
1059 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S2cS4*Den
1060 (Sqr(mext3),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S3PR*CpF5F6S4PL*mLF5 +
1061 CpcF6cF5S3PL*CpF5F6S4PR*mLF5 + CpcF6cF5S3PL*CpF5F6S4PL*mLF6 +
1062 CpcF6cF5S3PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S3PR*CpF5F6S4PL + CpcF6cF5S3PL*
1063 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext3))));
1064
1065 return result;
1066}
1067
1083Decay_amplitude_SSS calculate_diagram_SSS_t8g2n24_SSS(
1084 double mext1, double mext2, double mext3,
1085 double mIS4, double mLS5, double mLS6,
1086 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
1087 CpS3cS5cS6, const std::complex<double>& CpS4S5S6,
1088 double scale)
1089{
1090 auto& lib = Loop_library::get();
1091
1092 looplibrary::Bcoeff_t B_coeffs;
1093 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLS6*mLS6, scale*scale);
1094
1095 const auto b0tmp1 = B_coeffs.at(0);
1096
1097 Decay_amplitude_SSS result;
1098
1099 result.m_decay = mext1;
1100 result.m_scalar_1 = mext2;
1101 result.m_scalar_2 = mext3;
1102
1103 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b0tmp1*
1104 CpS1S2cS4*CpS3cS5cS6*CpS4S5S6*Den(Sqr(mext3),Sqr(mIS4)));
1105
1106 return result;
1107}
1108
1124Decay_amplitude_SSS calculate_diagram_SSS_t8g3n25_SUU(
1125 double mext1, double mext2, double mext3,
1126 double mIS4, double mLU5, double mLU6,
1127 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
1128 CpS3cU6cU5, const std::complex<double>& CpS4U5U6,
1129 double scale)
1130{
1131 auto& lib = Loop_library::get();
1132
1133 looplibrary::Bcoeff_t B_coeffs;
1134 lib.B(B_coeffs, mext3*mext3, mLU5*mLU5, mLU6*mLU6, scale*scale);
1135
1136 const auto b0tmp1 = B_coeffs.at(0);
1137
1138 Decay_amplitude_SSS result;
1139
1140 result.m_decay = mext1;
1141 result.m_scalar_1 = mext2;
1142 result.m_scalar_2 = mext3;
1143
1144 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*b0tmp1*
1145 CpS1S2cS4*CpS3cU6cU5*CpS4U5U6*Den(Sqr(mext3),Sqr(mIS4)));
1146
1147 return result;
1148}
1149
1166Decay_amplitude_SSS calculate_diagram_SSS_t8g4n26_SSV(
1167 double mext1, double mext2, double mext3,
1168 double mIS4, double mLS5, double mLV6,
1169 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
1170 CpS3cS5cV6, const std::complex<double>& CpS4S5V6,
1171 double scale)
1172{
1173 auto& lib = Loop_library::get();
1174
1175 looplibrary::Acoeff_t A_coeffs;
1176 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
1177
1178 looplibrary::Bcoeff_t B_coeffs;
1179 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
1180
1181 const auto a0tmp1 = A_coeffs.at(0);
1182 const auto b0tmp2 = B_coeffs.at(0);
1183 const auto b1tmp3 = B_coeffs.at(1);
1184
1185 Decay_amplitude_SSS result;
1186
1187 result.m_decay = mext1;
1188 result.m_scalar_1 = mext2;
1189 result.m_scalar_2 = mext3;
1190
1191 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1S2cS4*
1192 CpS3cS5cV6*CpS4S5V6*(b0tmp2 + Den(Sqr(mext3),Sqr(mIS4))*(a0tmp1 - 2*
1193 b1tmp3*Sqr(mext3) + b0tmp2*(Sqr(mIS4) + Sqr(mLS5)))));
1194
1195 return result;
1196}
1197
1213Decay_amplitude_SSS calculate_diagram_SSS_t8g5n27_SVV(
1214 double mext1, double mext2, double mext3,
1215 double mIS4, double mLV5, double mLV6,
1216 const std::complex<double>& CpS1S2cS4, const std::complex<double>&
1217 CpS3cV5cV6, const std::complex<double>& CpS4V5V6,
1218 double scale, double finite)
1219{
1220 auto& lib = Loop_library::get();
1221
1222 looplibrary::Bcoeff_t B_coeffs;
1223 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
1224
1225 const auto b0tmp1 = B_coeffs.at(0);
1226
1227 Decay_amplitude_SSS result;
1228
1229 result.m_decay = mext1;
1230 result.m_scalar_1 = mext2;
1231 result.m_scalar_2 = mext3;
1232
1233 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S2cS4*
1234 CpS3cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext3),Sqr(mIS4)));
1235
1236 return result;
1237}
1238
1258Decay_amplitude_SSS calculate_diagram_SSS_t8g6n28_VFF(
1259 double mext1, double mext2, double mext3,
1260 double mIV4, double mLF5, double mLF6,
1261 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
1262 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S3PL, const std::complex<
1263 double>& CpcF6cF5S3PR, const std::complex<double>& CpS1S2cV4,
1264 double scale)
1265{
1266 auto& lib = Loop_library::get();
1267
1268 looplibrary::Bcoeff_t B_coeffs;
1269 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
1270
1271 const auto b0tmp1 = B_coeffs.at(0);
1272 const auto b1tmp2 = B_coeffs.at(1);
1273
1274 Decay_amplitude_SSS result;
1275
1276 result.m_decay = mext1;
1277 result.m_scalar_1 = mext2;
1278 result.m_scalar_2 = mext3;
1279
1280 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S2cV4*(
1281 b0tmp1*(CpcF6cF5S3PR*CpF5F6V4PL + CpcF6cF5S3PL*CpF5F6V4PR)*mLF5 + b1tmp2*
1282 (CpcF6cF5S3PR*CpF5F6V4PL*mLF5 + CpcF6cF5S3PL*CpF5F6V4PR*mLF5 +
1283 CpcF6cF5S3PL*CpF5F6V4PL*mLF6 + CpcF6cF5S3PR*CpF5F6V4PR*mLF6))*Den(Sqr(
1284 mext3),Sqr(mIV4))*(Sqr(mext1) - Sqr(mext2)));
1285
1286 return result;
1287}
1288
1304Decay_amplitude_SSS calculate_diagram_SSS_t8g7n29_VSS(
1305 double mext1, double mext2, double mext3,
1306 double mIV4, double mLS5, double mLS6,
1307 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
1308 CpS3cS5cS6, const std::complex<double>& CpS5S6V4,
1309 double scale)
1310{
1311 auto& lib = Loop_library::get();
1312
1313 looplibrary::Bcoeff_t B_coeffs;
1314 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLS6*mLS6, scale*scale);
1315
1316 const auto b0tmp1 = B_coeffs.at(0);
1317 const auto b1tmp2 = B_coeffs.at(1);
1318
1319 Decay_amplitude_SSS result;
1320
1321 result.m_decay = mext1;
1322 result.m_scalar_1 = mext2;
1323 result.m_scalar_2 = mext3;
1324
1325 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*(b0tmp1 + 2
1326 *b1tmp2)*CpS1S2cV4*CpS3cS5cS6*CpS5S6V4*Den(Sqr(mext3),Sqr(mIV4))*(Sqr(
1327 mext1) - Sqr(mext2)));
1328
1329 return result;
1330}
1331
1348Decay_amplitude_SSS calculate_diagram_SSS_t8g8n30_VUU(
1349 double mext1, double mext2, double mext3,
1350 double mIV4, double mLU5, double mLU6,
1351 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
1352 CpS3cU6cU5, const std::complex<double>& CpU5U6V41, const std::complex<
1353 double>& CpU5U6V42,
1354 double scale)
1355{
1356 auto& lib = Loop_library::get();
1357
1358 looplibrary::Bcoeff_t B_coeffs;
1359 lib.B(B_coeffs, mext3*mext3, mLU5*mLU5, mLU6*mLU6, scale*scale);
1360
1361 const auto b0tmp1 = B_coeffs.at(0);
1362 const auto b1tmp2 = B_coeffs.at(1);
1363
1364 Decay_amplitude_SSS result;
1365
1366 result.m_decay = mext1;
1367 result.m_scalar_1 = mext2;
1368 result.m_scalar_2 = mext3;
1369
1370 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*CpS1S2cV4*
1371 CpS3cU6cU5*(b1tmp2*(CpU5U6V41 - CpU5U6V42) - b0tmp1*CpU5U6V42)*Den(Sqr(
1372 mext3),Sqr(mIV4))*(Sqr(mext1) - Sqr(mext2)));
1373
1374 return result;
1375}
1376
1393Decay_amplitude_SSS calculate_diagram_SSS_t8g9n31_VSV(
1394 double mext1, double mext2, double mext3,
1395 double mIV4, double mLS5, double mLV6,
1396 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
1397 CpS3cS5cV6, const std::complex<double>& CpS5V4V6,
1398 double scale)
1399{
1400 auto& lib = Loop_library::get();
1401
1402 looplibrary::Bcoeff_t B_coeffs;
1403 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
1404
1405 const auto b0tmp1 = B_coeffs.at(0);
1406 const auto b1tmp2 = B_coeffs.at(1);
1407
1408 Decay_amplitude_SSS result;
1409
1410 result.m_decay = mext1;
1411 result.m_scalar_1 = mext2;
1412 result.m_scalar_2 = mext3;
1413
1414 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1 -
1415 b1tmp2)*CpS1S2cV4*CpS3cS5cV6*CpS5V4V6*Den(Sqr(mext3),Sqr(mIV4))*(Sqr(
1416 mext1) - Sqr(mext2)));
1417
1418 return result;
1419}
1420
1438Decay_amplitude_SSS calculate_diagram_SSS_t8g10n32_VVV(
1439 double mext1, double mext2, double mext3,
1440 double mIV4, double mLV5, double mLV6,
1441 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
1442 CpS3cV5cV6, const std::complex<double>& CpV4V5V6,
1443 double scale)
1444{
1445 auto& lib = Loop_library::get();
1446
1447 looplibrary::Bcoeff_t B_coeffs;
1448 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
1449
1450 const auto b0tmp1 = B_coeffs.at(0);
1451 const auto b1tmp2 = B_coeffs.at(1);
1452
1453 Decay_amplitude_SSS result;
1454
1455 result.m_decay = mext1;
1456 result.m_scalar_1 = mext2;
1457 result.m_scalar_2 = mext3;
1458
1459 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1.5)*(b0tmp1 +
1460 2*b1tmp2)*CpS1S2cV4*CpS3cV5cV6*CpV4V5V6*Den(Sqr(mext3),Sqr(mIV4))*(Sqr(
1461 mext1) - Sqr(mext2)));
1462
1463 return result;
1464}
1465
1483Decay_amplitude_SSS calculate_diagram_SSS_t9g1n33_SFF(
1484 double mext1, double mext2, double mext3,
1485 double mIS4, double mLF5, double mLF6,
1486 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
1487 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S2PL, const std::complex<
1488 double>& CpcF6cF5S2PR, const std::complex<double>& CpS1S3cS4,
1489 double scale)
1490{
1491 auto& lib = Loop_library::get();
1492
1493 looplibrary::Acoeff_t A_coeffs;
1494 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
1495
1496 looplibrary::Bcoeff_t B_coeffs;
1497 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLF6*mLF6, scale*scale);
1498
1499 const auto a0tmp1 = A_coeffs.at(0);
1500 const auto b0tmp2 = B_coeffs.at(0);
1501 const auto b1tmp3 = B_coeffs.at(1);
1502
1503 Decay_amplitude_SSS result;
1504
1505 result.m_decay = mext1;
1506 result.m_scalar_1 = mext2;
1507 result.m_scalar_2 = mext3;
1508
1509 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S3cS4*Den
1510 (Sqr(mext2),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S2PR*CpF5F6S4PL*mLF5 +
1511 CpcF6cF5S2PL*CpF5F6S4PR*mLF5 + CpcF6cF5S2PL*CpF5F6S4PL*mLF6 +
1512 CpcF6cF5S2PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S2PR*CpF5F6S4PL + CpcF6cF5S2PL*
1513 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext2))));
1514
1515 return result;
1516}
1517
1533Decay_amplitude_SSS calculate_diagram_SSS_t9g2n34_SSS(
1534 double mext1, double mext2, double mext3,
1535 double mIS4, double mLS5, double mLS6,
1536 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
1537 CpS2cS5cS6, const std::complex<double>& CpS4S5S6,
1538 double scale)
1539{
1540 auto& lib = Loop_library::get();
1541
1542 looplibrary::Bcoeff_t B_coeffs;
1543 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLS6*mLS6, scale*scale);
1544
1545 const auto b0tmp1 = B_coeffs.at(0);
1546
1547 Decay_amplitude_SSS result;
1548
1549 result.m_decay = mext1;
1550 result.m_scalar_1 = mext2;
1551 result.m_scalar_2 = mext3;
1552
1553 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b0tmp1*
1554 CpS1S3cS4*CpS2cS5cS6*CpS4S5S6*Den(Sqr(mext2),Sqr(mIS4)));
1555
1556 return result;
1557}
1558
1574Decay_amplitude_SSS calculate_diagram_SSS_t9g3n35_SUU(
1575 double mext1, double mext2, double mext3,
1576 double mIS4, double mLU5, double mLU6,
1577 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
1578 CpS2cU6cU5, const std::complex<double>& CpS4U5U6,
1579 double scale)
1580{
1581 auto& lib = Loop_library::get();
1582
1583 looplibrary::Bcoeff_t B_coeffs;
1584 lib.B(B_coeffs, mext2*mext2, mLU5*mLU5, mLU6*mLU6, scale*scale);
1585
1586 const auto b0tmp1 = B_coeffs.at(0);
1587
1588 Decay_amplitude_SSS result;
1589
1590 result.m_decay = mext1;
1591 result.m_scalar_1 = mext2;
1592 result.m_scalar_2 = mext3;
1593
1594 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*b0tmp1*
1595 CpS1S3cS4*CpS2cU6cU5*CpS4U5U6*Den(Sqr(mext2),Sqr(mIS4)));
1596
1597 return result;
1598}
1599
1616Decay_amplitude_SSS calculate_diagram_SSS_t9g4n36_SSV(
1617 double mext1, double mext2, double mext3,
1618 double mIS4, double mLS5, double mLV6,
1619 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
1620 CpS2cS5cV6, const std::complex<double>& CpS4S5V6,
1621 double scale)
1622{
1623 auto& lib = Loop_library::get();
1624
1625 looplibrary::Acoeff_t A_coeffs;
1626 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
1627
1628 looplibrary::Bcoeff_t B_coeffs;
1629 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLV6*mLV6, scale*scale);
1630
1631 const auto a0tmp1 = A_coeffs.at(0);
1632 const auto b0tmp2 = B_coeffs.at(0);
1633 const auto b1tmp3 = B_coeffs.at(1);
1634
1635 Decay_amplitude_SSS result;
1636
1637 result.m_decay = mext1;
1638 result.m_scalar_1 = mext2;
1639 result.m_scalar_2 = mext3;
1640
1641 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1S3cS4*
1642 CpS2cS5cV6*CpS4S5V6*(b0tmp2 + Den(Sqr(mext2),Sqr(mIS4))*(a0tmp1 - 2*
1643 b1tmp3*Sqr(mext2) + b0tmp2*(Sqr(mIS4) + Sqr(mLS5)))));
1644
1645 return result;
1646}
1647
1663Decay_amplitude_SSS calculate_diagram_SSS_t9g5n37_SVV(
1664 double mext1, double mext2, double mext3,
1665 double mIS4, double mLV5, double mLV6,
1666 const std::complex<double>& CpS1S3cS4, const std::complex<double>&
1667 CpS2cV5cV6, const std::complex<double>& CpS4V5V6,
1668 double scale, double finite)
1669{
1670 auto& lib = Loop_library::get();
1671
1672 looplibrary::Bcoeff_t B_coeffs;
1673 lib.B(B_coeffs, mext2*mext2, mLV5*mLV5, mLV6*mLV6, scale*scale);
1674
1675 const auto b0tmp1 = B_coeffs.at(0);
1676
1677 Decay_amplitude_SSS result;
1678
1679 result.m_decay = mext1;
1680 result.m_scalar_1 = mext2;
1681 result.m_scalar_2 = mext3;
1682
1683 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S3cS4*
1684 CpS2cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext2),Sqr(mIS4)));
1685
1686 return result;
1687}
1688
1708Decay_amplitude_SSS calculate_diagram_SSS_t9g6n38_VFF(
1709 double mext1, double mext2, double mext3,
1710 double mIV4, double mLF5, double mLF6,
1711 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
1712 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S2PL, const std::complex<
1713 double>& CpcF6cF5S2PR, const std::complex<double>& CpS1S3cV4,
1714 double scale)
1715{
1716 auto& lib = Loop_library::get();
1717
1718 looplibrary::Bcoeff_t B_coeffs;
1719 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLF6*mLF6, scale*scale);
1720
1721 const auto b0tmp1 = B_coeffs.at(0);
1722 const auto b1tmp2 = B_coeffs.at(1);
1723
1724 Decay_amplitude_SSS result;
1725
1726 result.m_decay = mext1;
1727 result.m_scalar_1 = mext2;
1728 result.m_scalar_2 = mext3;
1729
1730 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1S3cV4*(
1731 b0tmp1*(CpcF6cF5S2PR*CpF5F6V4PL + CpcF6cF5S2PL*CpF5F6V4PR)*mLF5 + b1tmp2*
1732 (CpcF6cF5S2PR*CpF5F6V4PL*mLF5 + CpcF6cF5S2PL*CpF5F6V4PR*mLF5 +
1733 CpcF6cF5S2PL*CpF5F6V4PL*mLF6 + CpcF6cF5S2PR*CpF5F6V4PR*mLF6))*Den(Sqr(
1734 mext2),Sqr(mIV4))*(Sqr(mext1) - Sqr(mext3)));
1735
1736 return result;
1737}
1738
1754Decay_amplitude_SSS calculate_diagram_SSS_t9g7n39_VSS(
1755 double mext1, double mext2, double mext3,
1756 double mIV4, double mLS5, double mLS6,
1757 const std::complex<double>& CpS1S3cV4, const std::complex<double>&
1758 CpS2cS5cS6, const std::complex<double>& CpS5S6V4,
1759 double scale)
1760{
1761 auto& lib = Loop_library::get();
1762
1763 looplibrary::Bcoeff_t B_coeffs;
1764 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLS6*mLS6, scale*scale);
1765
1766 const auto b0tmp1 = B_coeffs.at(0);
1767 const auto b1tmp2 = B_coeffs.at(1);
1768
1769 Decay_amplitude_SSS result;
1770
1771 result.m_decay = mext1;
1772 result.m_scalar_1 = mext2;
1773 result.m_scalar_2 = mext3;
1774
1775 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*(b0tmp1 + 2
1776 *b1tmp2)*CpS1S3cV4*CpS2cS5cS6*CpS5S6V4*Den(Sqr(mext2),Sqr(mIV4))*(Sqr(
1777 mext1) - Sqr(mext3)));
1778
1779 return result;
1780}
1781
1798Decay_amplitude_SSS calculate_diagram_SSS_t9g8n40_VUU(
1799 double mext1, double mext2, double mext3,
1800 double mIV4, double mLU5, double mLU6,
1801 const std::complex<double>& CpS1S3cV4, const std::complex<double>&
1802 CpS2cU6cU5, const std::complex<double>& CpU5U6V41, const std::complex<
1803 double>& CpU5U6V42,
1804 double scale)
1805{
1806 auto& lib = Loop_library::get();
1807
1808 looplibrary::Bcoeff_t B_coeffs;
1809 lib.B(B_coeffs, mext2*mext2, mLU5*mLU5, mLU6*mLU6, scale*scale);
1810
1811 const auto b0tmp1 = B_coeffs.at(0);
1812 const auto b1tmp2 = B_coeffs.at(1);
1813
1814 Decay_amplitude_SSS result;
1815
1816 result.m_decay = mext1;
1817 result.m_scalar_1 = mext2;
1818 result.m_scalar_2 = mext3;
1819
1820 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*CpS1S3cV4*
1821 CpS2cU6cU5*(b1tmp2*(CpU5U6V41 - CpU5U6V42) - b0tmp1*CpU5U6V42)*Den(Sqr(
1822 mext2),Sqr(mIV4))*(Sqr(mext1) - Sqr(mext3)));
1823
1824 return result;
1825}
1826
1843Decay_amplitude_SSS calculate_diagram_SSS_t9g9n41_VSV(
1844 double mext1, double mext2, double mext3,
1845 double mIV4, double mLS5, double mLV6,
1846 const std::complex<double>& CpS1S3cV4, const std::complex<double>&
1847 CpS2cS5cV6, const std::complex<double>& CpS5V4V6,
1848 double scale)
1849{
1850 auto& lib = Loop_library::get();
1851
1852 looplibrary::Bcoeff_t B_coeffs;
1853 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLV6*mLV6, scale*scale);
1854
1855 const auto b0tmp1 = B_coeffs.at(0);
1856 const auto b1tmp2 = B_coeffs.at(1);
1857
1858 Decay_amplitude_SSS result;
1859
1860 result.m_decay = mext1;
1861 result.m_scalar_1 = mext2;
1862 result.m_scalar_2 = mext3;
1863
1864 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1 -
1865 b1tmp2)*CpS1S3cV4*CpS2cS5cV6*CpS5V4V6*Den(Sqr(mext2),Sqr(mIV4))*(Sqr(
1866 mext1) - Sqr(mext3)));
1867
1868 return result;
1869}
1870
1888Decay_amplitude_SSS calculate_diagram_SSS_t9g10n42_VVV(
1889 double mext1, double mext2, double mext3,
1890 double mIV4, double mLV5, double mLV6,
1891 const std::complex<double>& CpS1S3cV4, const std::complex<double>&
1892 CpS2cV5cV6, const std::complex<double>& CpV4V5V6,
1893 double scale)
1894{
1895 auto& lib = Loop_library::get();
1896
1897 looplibrary::Bcoeff_t B_coeffs;
1898 lib.B(B_coeffs, mext2*mext2, mLV5*mLV5, mLV6*mLV6, scale*scale);
1899
1900 const auto b0tmp1 = B_coeffs.at(0);
1901 const auto b1tmp2 = B_coeffs.at(1);
1902
1903 Decay_amplitude_SSS result;
1904
1905 result.m_decay = mext1;
1906 result.m_scalar_1 = mext2;
1907 result.m_scalar_2 = mext3;
1908
1909 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1.5)*(b0tmp1 +
1910 2*b1tmp2)*CpS1S3cV4*CpS2cV5cV6*CpV4V5V6*Den(Sqr(mext2),Sqr(mIV4))*(Sqr(
1911 mext1) - Sqr(mext3)));
1912
1913 return result;
1914}
1915
1933Decay_amplitude_SSS calculate_diagram_SSS_t10g1n43_SFF(
1934 double mext1, double mext2, double mext3,
1935 double mIS4, double mLF5, double mLF6,
1936 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
1937 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
1938 double>& CpcF6cF5S1PR, const std::complex<double>& CpS2S3cS4,
1939 double scale)
1940{
1941 auto& lib = Loop_library::get();
1942
1943 looplibrary::Acoeff_t A_coeffs;
1944 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
1945
1946 looplibrary::Bcoeff_t B_coeffs;
1947 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
1948
1949 const auto a0tmp1 = A_coeffs.at(0);
1950 const auto b0tmp2 = B_coeffs.at(0);
1951 const auto b1tmp3 = B_coeffs.at(1);
1952
1953 Decay_amplitude_SSS result;
1954
1955 result.m_decay = mext1;
1956 result.m_scalar_1 = mext2;
1957 result.m_scalar_2 = mext3;
1958
1959 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS2S3cS4*Den
1960 (Sqr(mext1),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S1PR*CpF5F6S4PL*mLF5 +
1961 CpcF6cF5S1PL*CpF5F6S4PR*mLF5 + CpcF6cF5S1PL*CpF5F6S4PL*mLF6 +
1962 CpcF6cF5S1PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S1PR*CpF5F6S4PL + CpcF6cF5S1PL*
1963 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext1))));
1964
1965 return result;
1966}
1967
1983Decay_amplitude_SSS calculate_diagram_SSS_t10g2n44_SSS(
1984 double mext1, double mext2, double mext3,
1985 double mIS4, double mLS5, double mLS6,
1986 const std::complex<double>& CpS1cS5cS6, const std::complex<double>&
1987 CpS2S3cS4, const std::complex<double>& CpS4S5S6,
1988 double scale)
1989{
1990 auto& lib = Loop_library::get();
1991
1992 looplibrary::Bcoeff_t B_coeffs;
1993 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
1994
1995 const auto b0tmp1 = B_coeffs.at(0);
1996
1997 Decay_amplitude_SSS result;
1998
1999 result.m_decay = mext1;
2000 result.m_scalar_1 = mext2;
2001 result.m_scalar_2 = mext3;
2002
2003 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b0tmp1*
2004 CpS1cS5cS6*CpS2S3cS4*CpS4S5S6*Den(Sqr(mext1),Sqr(mIS4)));
2005
2006 return result;
2007}
2008
2024Decay_amplitude_SSS calculate_diagram_SSS_t10g3n45_SUU(
2025 double mext1, double mext2, double mext3,
2026 double mIS4, double mLU5, double mLU6,
2027 const std::complex<double>& CpS1cU6cU5, const std::complex<double>&
2028 CpS2S3cS4, const std::complex<double>& CpS4U5U6,
2029 double scale)
2030{
2031 auto& lib = Loop_library::get();
2032
2033 looplibrary::Bcoeff_t B_coeffs;
2034 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
2035
2036 const auto b0tmp1 = B_coeffs.at(0);
2037
2038 Decay_amplitude_SSS result;
2039
2040 result.m_decay = mext1;
2041 result.m_scalar_1 = mext2;
2042 result.m_scalar_2 = mext3;
2043
2044 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*b0tmp1*
2045 CpS1cU6cU5*CpS2S3cS4*CpS4U5U6*Den(Sqr(mext1),Sqr(mIS4)));
2046
2047 return result;
2048}
2049
2066Decay_amplitude_SSS calculate_diagram_SSS_t10g4n46_SSV(
2067 double mext1, double mext2, double mext3,
2068 double mIS4, double mLS5, double mLV6,
2069 const std::complex<double>& CpS1cS5cV6, const std::complex<double>&
2070 CpS2S3cS4, const std::complex<double>& CpS4S5V6,
2071 double scale)
2072{
2073 auto& lib = Loop_library::get();
2074
2075 looplibrary::Acoeff_t A_coeffs;
2076 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
2077
2078 looplibrary::Bcoeff_t B_coeffs;
2079 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
2080
2081 const auto a0tmp1 = A_coeffs.at(0);
2082 const auto b0tmp2 = B_coeffs.at(0);
2083 const auto b1tmp3 = B_coeffs.at(1);
2084
2085 Decay_amplitude_SSS result;
2086
2087 result.m_decay = mext1;
2088 result.m_scalar_1 = mext2;
2089 result.m_scalar_2 = mext3;
2090
2091 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1cS5cV6*
2092 CpS2S3cS4*CpS4S5V6*Den(Sqr(mext1),Sqr(mIS4))*(a0tmp1 - 2*b1tmp3*Sqr(mext1
2093 ) + b0tmp2*(Sqr(mext1) + Sqr(mLS5))));
2094
2095 return result;
2096}
2097
2113Decay_amplitude_SSS calculate_diagram_SSS_t10g5n47_SVV(
2114 double mext1, double mext2, double mext3,
2115 double mIS4, double mLV5, double mLV6,
2116 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
2117 CpS2S3cS4, const std::complex<double>& CpS4V5V6,
2118 double scale, double finite)
2119{
2120 auto& lib = Loop_library::get();
2121
2122 looplibrary::Bcoeff_t B_coeffs;
2123 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
2124
2125 const auto b0tmp1 = B_coeffs.at(0);
2126
2127 Decay_amplitude_SSS result;
2128
2129 result.m_decay = mext1;
2130 result.m_scalar_1 = mext2;
2131 result.m_scalar_2 = mext3;
2132
2133 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1cV5cV6*
2134 CpS2S3cS4*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext1),Sqr(mIS4)));
2135
2136 return result;
2137}
2138
2158Decay_amplitude_SSS calculate_diagram_SSS_t10g6n48_VFF(
2159 double mext1, double mext2, double mext3,
2160 double mIV4, double mLF5, double mLF6,
2161 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
2162 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
2163 double>& CpcF6cF5S1PR, const std::complex<double>& CpS2S3cV4,
2164 double scale)
2165{
2166 auto& lib = Loop_library::get();
2167
2168 looplibrary::Bcoeff_t B_coeffs;
2169 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
2170
2171 const auto b0tmp1 = B_coeffs.at(0);
2172 const auto b1tmp2 = B_coeffs.at(1);
2173
2174 Decay_amplitude_SSS result;
2175
2176 result.m_decay = mext1;
2177 result.m_scalar_1 = mext2;
2178 result.m_scalar_2 = mext3;
2179
2180 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS2S3cV4*(
2181 b0tmp1*(CpcF6cF5S1PR*CpF5F6V4PL + CpcF6cF5S1PL*CpF5F6V4PR)*mLF5 + b1tmp2*
2182 (CpcF6cF5S1PR*CpF5F6V4PL*mLF5 + CpcF6cF5S1PL*CpF5F6V4PR*mLF5 +
2183 CpcF6cF5S1PL*CpF5F6V4PL*mLF6 + CpcF6cF5S1PR*CpF5F6V4PR*mLF6))*Den(Sqr(
2184 mext1),Sqr(mIV4))*(Sqr(mext2) - Sqr(mext3)));
2185
2186 return result;
2187}
2188
2204Decay_amplitude_SSS calculate_diagram_SSS_t10g7n49_VSS(
2205 double mext1, double mext2, double mext3,
2206 double mIV4, double mLS5, double mLS6,
2207 const std::complex<double>& CpS1cS5cS6, const std::complex<double>&
2208 CpS2S3cV4, const std::complex<double>& CpS5S6V4,
2209 double scale)
2210{
2211 auto& lib = Loop_library::get();
2212
2213 looplibrary::Bcoeff_t B_coeffs;
2214 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
2215
2216 const auto b0tmp1 = B_coeffs.at(0);
2217 const auto b1tmp2 = B_coeffs.at(1);
2218
2219 Decay_amplitude_SSS result;
2220
2221 result.m_decay = mext1;
2222 result.m_scalar_1 = mext2;
2223 result.m_scalar_2 = mext3;
2224
2225 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*(b0tmp1 + 2
2226 *b1tmp2)*CpS1cS5cS6*CpS2S3cV4*CpS5S6V4*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
2227 mext2) - Sqr(mext3)));
2228
2229 return result;
2230}
2231
2248Decay_amplitude_SSS calculate_diagram_SSS_t10g8n50_VUU(
2249 double mext1, double mext2, double mext3,
2250 double mIV4, double mLU5, double mLU6,
2251 const std::complex<double>& CpS1cU6cU5, const std::complex<double>&
2252 CpS2S3cV4, const std::complex<double>& CpU5U6V41, const std::complex<
2253 double>& CpU5U6V42,
2254 double scale)
2255{
2256 auto& lib = Loop_library::get();
2257
2258 looplibrary::Bcoeff_t B_coeffs;
2259 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
2260
2261 const auto b0tmp1 = B_coeffs.at(0);
2262 const auto b1tmp2 = B_coeffs.at(1);
2263
2264 Decay_amplitude_SSS result;
2265
2266 result.m_decay = mext1;
2267 result.m_scalar_1 = mext2;
2268 result.m_scalar_2 = mext3;
2269
2270 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*CpS1cU6cU5
2271 *CpS2S3cV4*(b1tmp2*(CpU5U6V41 - CpU5U6V42) - b0tmp1*CpU5U6V42)*Den(Sqr(
2272 mext1),Sqr(mIV4))*(Sqr(mext2) - Sqr(mext3)));
2273
2274 return result;
2275}
2276
2293Decay_amplitude_SSS calculate_diagram_SSS_t10g9n51_VSV(
2294 double mext1, double mext2, double mext3,
2295 double mIV4, double mLS5, double mLV6,
2296 const std::complex<double>& CpS1cS5cV6, const std::complex<double>&
2297 CpS2S3cV4, const std::complex<double>& CpS5V4V6,
2298 double scale)
2299{
2300 auto& lib = Loop_library::get();
2301
2302 looplibrary::Bcoeff_t B_coeffs;
2303 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
2304
2305 const auto b0tmp1 = B_coeffs.at(0);
2306 const auto b1tmp2 = B_coeffs.at(1);
2307
2308 Decay_amplitude_SSS result;
2309
2310 result.m_decay = mext1;
2311 result.m_scalar_1 = mext2;
2312 result.m_scalar_2 = mext3;
2313
2314 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1 -
2315 b1tmp2)*CpS1cS5cV6*CpS2S3cV4*CpS5V4V6*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
2316 mext2) - Sqr(mext3)));
2317
2318 return result;
2319}
2320
2338Decay_amplitude_SSS calculate_diagram_SSS_t10g10n52_VVV(
2339 double mext1, double mext2, double mext3,
2340 double mIV4, double mLV5, double mLV6,
2341 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
2342 CpS2S3cV4, const std::complex<double>& CpV4V5V6,
2343 double scale)
2344{
2345 auto& lib = Loop_library::get();
2346
2347 looplibrary::Bcoeff_t B_coeffs;
2348 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
2349
2350 const auto b0tmp1 = B_coeffs.at(0);
2351 const auto b1tmp2 = B_coeffs.at(1);
2352
2353 Decay_amplitude_SSS result;
2354
2355 result.m_decay = mext1;
2356 result.m_scalar_1 = mext2;
2357 result.m_scalar_2 = mext3;
2358
2359 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1.5)*(b0tmp1 +
2360 2*b1tmp2)*CpS1cV5cV6*CpS2S3cV4*CpV4V5V6*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
2361 mext2) - Sqr(mext3)));
2362
2363 return result;
2364}
2365
2388Decay_amplitude_SVV calculate_diagram_SVV_t1g1n1_FFF(
2389 double mext1, double mext2, double mext3,
2390 double mLF4, double mLF5, double mLF6,
2391 const std::complex<double>& CpcF4cF5S1PL, const std::complex<double>&
2392 CpcF4cF5S1PR, const std::complex<double>& CpF5F6V3PL, const std::complex<
2393 double>& CpF5F6V3PR, const std::complex<double>& CpcF6F4V2PL, const std::
2394 complex<double>& CpcF6F4V2PR,
2395 double scale)
2396{
2397 auto& lib = Loop_library::get();
2398
2399 looplibrary::Bcoeff_t B_coeffs;
2400 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
2401
2402 looplibrary::Ccoeff_t C_coeffs;
2403 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLF4*mLF4, mLF6*mLF6,
2404 mLF5*mLF5, scale*scale);
2405
2406 const auto b0tmp1 = B_coeffs.at(0);
2407 const auto c0tmp2 = C_coeffs.at(0);
2408 const auto c00tmp3 = C_coeffs.at(3);
2409 const auto c1tmp4 = C_coeffs.at(1);
2410 const auto c12tmp5 = C_coeffs.at(5);
2411 const auto c2tmp6 = C_coeffs.at(2);
2412 const auto c22tmp7 = C_coeffs.at(6);
2413
2414 Decay_amplitude_SVV result;
2415
2416 result.m_decay = mext1;
2417 result.m_vector_1 = mext2;
2418 result.m_vector_2 = mext3;
2419
2420 result.form_factor_eps = oneOver16PiSqr*(-2*(c0tmp2*(CpcF4cF5S1PL*
2421 CpcF6F4V2PL*CpF5F6V3PL - CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR)*mLF4 +
2422 c2tmp6*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 - CpcF4cF5S1PR*
2423 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 -
2424 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5) + c1tmp4*(CpcF4cF5S1PL*
2425 CpcF6F4V2PL*CpF5F6V3PL*mLF4 - CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 -
2426 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6 + CpcF4cF5S1PR*CpcF6F4V2PL*
2427 CpF5F6V3PR*mLF6)));
2428 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*(-4*
2429 c00tmp3*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 + CpcF4cF5S1PR*
2430 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 +
2431 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5) - 2*c0tmp2*CpcF4cF5S1PR*
2432 CpcF6F4V2PR*CpF5F6V3PL*mLF4*mLF5*mLF6 - 2*c0tmp2*CpcF4cF5S1PL*CpcF6F4V2PL
2433 *CpF5F6V3PR*mLF4*mLF5*mLF6 + 2*b0tmp1*(CpcF4cF5S1PL*(CpcF6F4V2PL*
2434 CpF5F6V3PL*mLF4 + CpcF6F4V2PR*CpF5F6V3PR*mLF5 - CpcF6F4V2PR*CpF5F6V3PL*
2435 mLF6) + CpcF4cF5S1PR*(CpcF6F4V2PR*CpF5F6V3PR*mLF4 + CpcF6F4V2PL*
2436 CpF5F6V3PL*mLF5 - CpcF6F4V2PL*CpF5F6V3PR*mLF6)) + 2*c0tmp2*CpcF4cF5S1PL*
2437 CpcF6F4V2PL*CpF5F6V3PL*Cube(mLF4) + 2*c0tmp2*CpcF4cF5S1PR*CpcF6F4V2PR*
2438 CpF5F6V3PR*Cube(mLF4) + c0tmp2*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*
2439 Sqr(mext1) + c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext1) +
2440 3*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext1) + c0tmp2*
2441 CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext1) + c1tmp4*CpcF4cF5S1PR
2442 *CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext1) + 3*c2tmp6*CpcF4cF5S1PR*
2443 CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext1) + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*
2444 CpF5F6V3PL*mLF5*Sqr(mext1) + c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*
2445 mLF5*Sqr(mext1) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6*Sqr(
2446 mext1) - 2*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6*Sqr(mext1) -
2447 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6*Sqr(mext1) - 2*c2tmp6*
2448 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6*Sqr(mext1) + c0tmp2*CpcF4cF5S1PL
2449 *CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext2) + 3*c1tmp4*CpcF4cF5S1PL*
2450 CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext2) + c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*
2451 CpF5F6V3PL*mLF4*Sqr(mext2) + c0tmp2*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*
2452 mLF4*Sqr(mext2) + 3*c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(
2453 mext2) + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext2) + 2*
2454 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5*Sqr(mext2) + c2tmp6*
2455 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5*Sqr(mext2) + 2*c1tmp4*
2456 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5*Sqr(mext2) + c2tmp6*CpcF4cF5S1PL
2457 *CpcF6F4V2PR*CpF5F6V3PR*mLF5*Sqr(mext2) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR
2458 *CpF5F6V3PL*mLF6*Sqr(mext2) - c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*
2459 mLF6*Sqr(mext2) - c0tmp2*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(
2460 mext3) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext3) -
2461 c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4*Sqr(mext3) - c0tmp2*
2462 CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext3) - c1tmp4*CpcF4cF5S1PR
2463 *CpcF6F4V2PR*CpF5F6V3PR*mLF4*Sqr(mext3) - c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PR
2464 *CpF5F6V3PR*mLF4*Sqr(mext3) - c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*
2465 mLF5*Sqr(mext3) - c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5*Sqr(
2466 mext3) + c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6*Sqr(mext3) +
2467 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6*Sqr(mext3) + 2*c0tmp2*
2468 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5*Sqr(mLF4) + 2*c0tmp2*
2469 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5*Sqr(mLF4) - 2*c0tmp2*
2470 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6*Sqr(mLF4) - 2*c0tmp2*
2471 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6*Sqr(mLF4)));
2472 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,2)*(c1tmp4*
2473 CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 2*c22tmp7*CpcF4cF5S1PL*
2474 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 3*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*
2475 CpF5F6V3PL*mLF4 + c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 2*
2476 c22tmp7*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 3*c2tmp6*CpcF4cF5S1PR*
2477 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + c0tmp2*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL
2478 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR)*mLF4 + 2*c22tmp7*CpcF4cF5S1PR*
2479 CpcF6F4V2PL*CpF5F6V3PL*mLF5 + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*
2480 mLF5 + 2*c22tmp7*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + c2tmp6*
2481 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + 2*c12tmp5*(CpcF4cF5S1PL*
2482 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 +
2483 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 + CpcF4cF5S1PL*CpcF6F4V2PR*
2484 CpF5F6V3PR*mLF5) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6 -
2485 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6));
2486 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,2)*(c1tmp4*
2487 CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 2*c22tmp7*CpcF4cF5S1PL*
2488 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 3*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*
2489 CpF5F6V3PL*mLF4 + c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 2*
2490 c22tmp7*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 3*c2tmp6*CpcF4cF5S1PR*
2491 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + c0tmp2*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL
2492 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR)*mLF4 + 2*c22tmp7*CpcF4cF5S1PR*
2493 CpcF6F4V2PL*CpF5F6V3PL*mLF5 + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*
2494 mLF5 + 2*c22tmp7*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + c2tmp6*
2495 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + 2*c12tmp5*(CpcF4cF5S1PL*
2496 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 +
2497 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 + CpcF4cF5S1PL*CpcF6F4V2PR*
2498 CpF5F6V3PR*mLF5) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6 -
2499 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6));
2500 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,2)*(c1tmp4*
2501 CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 2*c22tmp7*CpcF4cF5S1PL*
2502 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 3*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*
2503 CpF5F6V3PL*mLF4 + c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 2*
2504 c22tmp7*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 3*c2tmp6*CpcF4cF5S1PR*
2505 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + c0tmp2*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL
2506 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR)*mLF4 + 2*c22tmp7*CpcF4cF5S1PR*
2507 CpcF6F4V2PL*CpF5F6V3PL*mLF5 + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*
2508 mLF5 + 2*c22tmp7*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + c2tmp6*
2509 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + 2*c12tmp5*(CpcF4cF5S1PL*
2510 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 +
2511 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 + CpcF4cF5S1PL*CpcF6F4V2PR*
2512 CpF5F6V3PR*mLF5) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6 -
2513 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6));
2514 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,2)*(c1tmp4*
2515 CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 2*c22tmp7*CpcF4cF5S1PL*
2516 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + 3*c2tmp6*CpcF4cF5S1PL*CpcF6F4V2PL*
2517 CpF5F6V3PL*mLF4 + c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 2*
2518 c22tmp7*CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 + 3*c2tmp6*CpcF4cF5S1PR*
2519 CpcF6F4V2PR*CpF5F6V3PR*mLF4 + c0tmp2*(CpcF4cF5S1PL*CpcF6F4V2PL*CpF5F6V3PL
2520 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR)*mLF4 + 2*c22tmp7*CpcF4cF5S1PR*
2521 CpcF6F4V2PL*CpF5F6V3PL*mLF5 + c2tmp6*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*
2522 mLF5 + 2*c22tmp7*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + c2tmp6*
2523 CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PR*mLF5 + 2*c12tmp5*(CpcF4cF5S1PL*
2524 CpcF6F4V2PL*CpF5F6V3PL*mLF4 + CpcF4cF5S1PR*CpcF6F4V2PR*CpF5F6V3PR*mLF4 +
2525 CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PL*mLF5 + CpcF4cF5S1PL*CpcF6F4V2PR*
2526 CpF5F6V3PR*mLF5) - c1tmp4*CpcF4cF5S1PL*CpcF6F4V2PR*CpF5F6V3PL*mLF6 -
2527 c1tmp4*CpcF4cF5S1PR*CpcF6F4V2PL*CpF5F6V3PR*mLF6));
2528
2529 return result;
2530}
2531
2547Decay_amplitude_SVV calculate_diagram_SVV_t1g2n2_SSS(
2548 double mext1, double mext2, double mext3,
2549 double mLS4, double mLS5, double mLS6,
2550 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
2551 CpS4cS6V2, const std::complex<double>& CpS5S6V3,
2552 double scale)
2553{
2554 auto& lib = Loop_library::get();
2555
2556 looplibrary::Ccoeff_t C_coeffs;
2557 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
2558 mLS5*mLS5, scale*scale);
2559
2560 const auto c00tmp1 = C_coeffs.at(3);
2561 const auto c12tmp2 = C_coeffs.at(5);
2562 const auto c2tmp3 = C_coeffs.at(2);
2563 const auto c22tmp4 = C_coeffs.at(6);
2564
2565 Decay_amplitude_SVV result;
2566
2567 result.m_decay = mext1;
2568 result.m_vector_1 = mext2;
2569 result.m_vector_2 = mext3;
2570
2571 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,4)*c00tmp1*
2572 CpS1cS4cS5*CpS4cS6V2*CpS5S6V3);
2573 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,4)*(c12tmp2 +
2574 c22tmp4 + c2tmp3)*CpS1cS4cS5*CpS4cS6V2*CpS5S6V3);
2575 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,4)*(c12tmp2 +
2576 c22tmp4 + c2tmp3)*CpS1cS4cS5*CpS4cS6V2*CpS5S6V3);
2577 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,4)*(c12tmp2 +
2578 c22tmp4 + c2tmp3)*CpS1cS4cS5*CpS4cS6V2*CpS5S6V3);
2579 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,4)*(c12tmp2 +
2580 c22tmp4 + c2tmp3)*CpS1cS4cS5*CpS4cS6V2*CpS5S6V3);
2581
2582 return result;
2583}
2584
2600Decay_amplitude_SVV calculate_diagram_SVV_t1g3n3_UUU(
2601 double mext1, double mext2, double mext3,
2602 double mLU4, double mLU5, double mLU6,
2603 const std::complex<double>& CpS1cU4cU5, const std::complex<double>& CpU5U6V3
2604 , const std::complex<double>& CpcU6U4V2,
2605 double scale)
2606{
2607 auto& lib = Loop_library::get();
2608
2609 looplibrary::Ccoeff_t C_coeffs;
2610 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLU4*mLU4, mLU6*mLU6,
2611 mLU5*mLU5, scale*scale);
2612
2613 const auto c00tmp1 = C_coeffs.at(3);
2614 const auto c12tmp2 = C_coeffs.at(5);
2615 const auto c2tmp3 = C_coeffs.at(2);
2616 const auto c22tmp4 = C_coeffs.at(6);
2617
2618 Decay_amplitude_SVV result;
2619
2620 result.m_decay = mext1;
2621 result.m_vector_1 = mext2;
2622 result.m_vector_2 = mext3;
2623
2624 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*c00tmp1*
2625 CpcU6U4V2*CpS1cU4cU5*CpU5U6V3);
2626 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,1)*(c12tmp2 +
2627 c22tmp4 + c2tmp3)*CpcU6U4V2*CpS1cU4cU5*CpU5U6V3);
2628 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,1)*(c12tmp2 +
2629 c22tmp4 + c2tmp3)*CpcU6U4V2*CpS1cU4cU5*CpU5U6V3);
2630 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,1)*(c12tmp2 +
2631 c22tmp4 + c2tmp3)*CpcU6U4V2*CpS1cU4cU5*CpU5U6V3);
2632 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,1)*(c12tmp2 +
2633 c22tmp4 + c2tmp3)*CpcU6U4V2*CpS1cU4cU5*CpU5U6V3);
2634
2635 return result;
2636}
2637
2653Decay_amplitude_SVV calculate_diagram_SVV_t1g4n4_SSV(
2654 double mext1, double mext2, double mext3,
2655 double mLS4, double mLS5, double mLV6,
2656 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
2657 CpS4V2cV6, const std::complex<double>& CpS5V3V6,
2658 double scale)
2659{
2660 auto& lib = Loop_library::get();
2661
2662 looplibrary::Ccoeff_t C_coeffs;
2663 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
2664 mLS5*mLS5, scale*scale);
2665
2666 const auto c0tmp1 = C_coeffs.at(0);
2667
2668 Decay_amplitude_SVV result;
2669
2670 result.m_decay = mext1;
2671 result.m_vector_1 = mext2;
2672 result.m_vector_2 = mext3;
2673
2674 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*c0tmp1*
2675 CpS1cS4cS5*CpS4V2cV6*CpS5V3V6);
2676
2677 return result;
2678}
2679
2696Decay_amplitude_SVV calculate_diagram_SVV_t1g5n5_SVS(
2697 double mext1, double mext2, double mext3,
2698 double mLS4, double mLV5, double mLS6,
2699 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
2700 CpS4cS6V2, const std::complex<double>& CpS6V3V5,
2701 double scale)
2702{
2703 auto& lib = Loop_library::get();
2704
2705 looplibrary::Ccoeff_t C_coeffs;
2706 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
2707 mLV5*mLV5, scale*scale);
2708
2709 const auto c00tmp1 = C_coeffs.at(3);
2710 const auto c12tmp2 = C_coeffs.at(5);
2711 const auto c2tmp3 = C_coeffs.at(2);
2712 const auto c22tmp4 = C_coeffs.at(6);
2713
2714 Decay_amplitude_SVV result;
2715
2716 result.m_decay = mext1;
2717 result.m_vector_1 = mext2;
2718 result.m_vector_2 = mext3;
2719
2720 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,2)*c00tmp1*
2721 CpS1cS4cV5*CpS4cS6V2*CpS6V3V5);
2722 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,2)*(c12tmp2 +
2723 c22tmp4 - c2tmp3)*CpS1cS4cV5*CpS4cS6V2*CpS6V3V5);
2724 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,2)*(c12tmp2 +
2725 c22tmp4 - c2tmp3)*CpS1cS4cV5*CpS4cS6V2*CpS6V3V5);
2726 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,2)*(c12tmp2 +
2727 c22tmp4 - c2tmp3)*CpS1cS4cV5*CpS4cS6V2*CpS6V3V5);
2728 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,2)*(c12tmp2 +
2729 c22tmp4 - c2tmp3)*CpS1cS4cV5*CpS4cS6V2*CpS6V3V5);
2730
2731 return result;
2732}
2733
2750Decay_amplitude_SVV calculate_diagram_SVV_t1g6n6_VSS(
2751 double mext1, double mext2, double mext3,
2752 double mLV4, double mLS5, double mLS6,
2753 const std::complex<double>& CpS1cS5cV4, const std::complex<double>& CpS5S6V3
2754 , const std::complex<double>& CpcS6V2V4,
2755 double scale)
2756{
2757 auto& lib = Loop_library::get();
2758
2759 looplibrary::Ccoeff_t C_coeffs;
2760 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
2761 mLS5*mLS5, scale*scale);
2762
2763 const auto c0tmp1 = C_coeffs.at(0);
2764 const auto c00tmp2 = C_coeffs.at(3);
2765 const auto c1tmp3 = C_coeffs.at(1);
2766 const auto c12tmp4 = C_coeffs.at(5);
2767 const auto c2tmp5 = C_coeffs.at(2);
2768 const auto c22tmp6 = C_coeffs.at(6);
2769
2770 Decay_amplitude_SVV result;
2771
2772 result.m_decay = mext1;
2773 result.m_vector_1 = mext2;
2774 result.m_vector_2 = mext3;
2775
2776 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,2)*c00tmp2*
2777 CpcS6V2V4*CpS1cS5cV4*CpS5S6V3);
2778 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,2)*(2*c0tmp1
2779 + c12tmp4 + 2*c1tmp3 + c22tmp6 + 3*c2tmp5)*CpcS6V2V4*CpS1cS5cV4*CpS5S6V3)
2780 ;
2781 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,2)*(2*c0tmp1
2782 + c12tmp4 + 2*c1tmp3 + c22tmp6 + 3*c2tmp5)*CpcS6V2V4*CpS1cS5cV4*CpS5S6V3)
2783 ;
2784 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,2)*(2*c0tmp1
2785 + c12tmp4 + 2*c1tmp3 + c22tmp6 + 3*c2tmp5)*CpcS6V2V4*CpS1cS5cV4*CpS5S6V3)
2786 ;
2787 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,2)*(2*c0tmp1
2788 + c12tmp4 + 2*c1tmp3 + c22tmp6 + 3*c2tmp5)*CpcS6V2V4*CpS1cS5cV4*CpS5S6V3)
2789 ;
2790
2791 return result;
2792}
2793
2812Decay_amplitude_SVV calculate_diagram_SVV_t1g7n7_SVV(
2813 double mext1, double mext2, double mext3,
2814 double mLS4, double mLV5, double mLV6,
2815 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
2816 CpS4V2cV6, const std::complex<double>& CpV3V5V6,
2817 double scale)
2818{
2819 auto& lib = Loop_library::get();
2820
2821 looplibrary::Bcoeff_t B_coeffs;
2822 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
2823
2824 looplibrary::Ccoeff_t C_coeffs;
2825 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
2826 mLV5*mLV5, scale*scale);
2827
2828 const auto b0tmp1 = B_coeffs.at(0);
2829 const auto c0tmp2 = C_coeffs.at(0);
2830 const auto c00tmp3 = C_coeffs.at(3);
2831 const auto c1tmp4 = C_coeffs.at(1);
2832 const auto c12tmp5 = C_coeffs.at(5);
2833 const auto c2tmp6 = C_coeffs.at(2);
2834 const auto c22tmp7 = C_coeffs.at(6);
2835
2836 Decay_amplitude_SVV result;
2837
2838 result.m_decay = mext1;
2839 result.m_vector_1 = mext2;
2840 result.m_vector_2 = mext3;
2841
2842 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1cS4cV5*
2843 CpS4V2cV6*CpV3V5V6*(b0tmp1 - c00tmp3 - c1tmp4*Sqr(mext1) - c2tmp6*Sqr(
2844 mext1) - c0tmp2*Sqr(mext2) + c1tmp4*Sqr(mext2) + c2tmp6*Sqr(mext2) +
2845 c0tmp2*Sqr(mext3) + c1tmp4*Sqr(mext3) - c2tmp6*Sqr(mext3) + c0tmp2*Sqr(
2846 mLS4)));
2847 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,-1)*(c12tmp5
2848 - 4*c1tmp4 + c22tmp7 - c2tmp6)*CpS1cS4cV5*CpS4V2cV6*CpV3V5V6);
2849 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,-1)*(c12tmp5
2850 - 4*c1tmp4 + c22tmp7 - c2tmp6)*CpS1cS4cV5*CpS4V2cV6*CpV3V5V6);
2851 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,-1)*(c12tmp5
2852 - 4*c1tmp4 + c22tmp7 - c2tmp6)*CpS1cS4cV5*CpS4V2cV6*CpV3V5V6);
2853 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,-1)*(c12tmp5
2854 - 4*c1tmp4 + c22tmp7 - c2tmp6)*CpS1cS4cV5*CpS4V2cV6*CpV3V5V6);
2855
2856 return result;
2857}
2858
2877Decay_amplitude_SVV calculate_diagram_SVV_t1g8n8_VSV(
2878 double mext1, double mext2, double mext3,
2879 double mLV4, double mLS5, double mLV6,
2880 const std::complex<double>& CpS1cS5cV4, const std::complex<double>& CpS5V3V6
2881 , const std::complex<double>& CpV2V4cV6,
2882 double scale)
2883{
2884 auto& lib = Loop_library::get();
2885
2886 looplibrary::Bcoeff_t B_coeffs;
2887 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
2888
2889 looplibrary::Ccoeff_t C_coeffs;
2890 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
2891 mLS5*mLS5, scale*scale);
2892
2893 const auto b0tmp1 = B_coeffs.at(0);
2894 const auto c0tmp2 = C_coeffs.at(0);
2895 const auto c00tmp3 = C_coeffs.at(3);
2896 const auto c1tmp4 = C_coeffs.at(1);
2897 const auto c12tmp5 = C_coeffs.at(5);
2898 const auto c2tmp6 = C_coeffs.at(2);
2899 const auto c22tmp7 = C_coeffs.at(6);
2900
2901 Decay_amplitude_SVV result;
2902
2903 result.m_decay = mext1;
2904 result.m_vector_1 = mext2;
2905 result.m_vector_2 = mext3;
2906
2907 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1cS5cV4*
2908 CpS5V3V6*CpV2V4cV6*(b0tmp1 - c00tmp3 + 2*c0tmp2*Sqr(mext1) + c1tmp4*Sqr(
2909 mext1) + 3*c2tmp6*Sqr(mext1) + 2*c0tmp2*Sqr(mext2) + 3*c1tmp4*Sqr(mext2)
2910 + c2tmp6*Sqr(mext2) - 2*c0tmp2*Sqr(mext3) - c1tmp4*Sqr(mext3) - c2tmp6*
2911 Sqr(mext3) + c0tmp2*Sqr(mLV4)));
2912 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,-1)*(2*c0tmp2
2913 + c12tmp5 - 2*c1tmp4 + c22tmp7 + 3*c2tmp6)*CpS1cS5cV4*CpS5V3V6*CpV2V4cV6
2914 );
2915 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,-1)*(2*c0tmp2
2916 + c12tmp5 - 2*c1tmp4 + c22tmp7 + 3*c2tmp6)*CpS1cS5cV4*CpS5V3V6*CpV2V4cV6
2917 );
2918 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,-1)*(2*c0tmp2
2919 + c12tmp5 - 2*c1tmp4 + c22tmp7 + 3*c2tmp6)*CpS1cS5cV4*CpS5V3V6*CpV2V4cV6
2920 );
2921 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,-1)*(2*c0tmp2
2922 + c12tmp5 - 2*c1tmp4 + c22tmp7 + 3*c2tmp6)*CpS1cS5cV4*CpS5V3V6*CpV2V4cV6
2923 );
2924
2925 return result;
2926}
2927
2943Decay_amplitude_SVV calculate_diagram_SVV_t1g9n9_VVS(
2944 double mext1, double mext2, double mext3,
2945 double mLV4, double mLV5, double mLS6,
2946 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
2947 CpcS6V2V4, const std::complex<double>& CpS6V3V5,
2948 double scale)
2949{
2950 auto& lib = Loop_library::get();
2951
2952 looplibrary::Ccoeff_t C_coeffs;
2953 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
2954 mLV5*mLV5, scale*scale);
2955
2956 const auto c0tmp1 = C_coeffs.at(0);
2957
2958 Decay_amplitude_SVV result;
2959
2960 result.m_decay = mext1;
2961 result.m_vector_1 = mext2;
2962 result.m_vector_2 = mext3;
2963
2964 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*c0tmp1*
2965 CpcS6V2V4*CpS1cV4cV5*CpS6V3V5);
2966
2967 return result;
2968}
2969
2989Decay_amplitude_SVV calculate_diagram_SVV_t1g10n10_VVV(
2990 double mext1, double mext2, double mext3,
2991 double mLV4, double mLV5, double mLV6,
2992 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
2993 CpV2V4cV6, const std::complex<double>& CpV3V5V6,
2994 double scale, double finite)
2995{
2996 auto& lib = Loop_library::get();
2997
2998 looplibrary::Bcoeff_t B_coeffs;
2999 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
3000
3001 looplibrary::Ccoeff_t C_coeffs;
3002 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
3003 mLV5*mLV5, scale*scale);
3004
3005 const auto b0tmp1 = B_coeffs.at(0);
3006 const auto c0tmp2 = C_coeffs.at(0);
3007 const auto c00tmp3 = C_coeffs.at(3);
3008 const auto c1tmp4 = C_coeffs.at(1);
3009 const auto c12tmp5 = C_coeffs.at(5);
3010 const auto c2tmp6 = C_coeffs.at(2);
3011 const auto c22tmp7 = C_coeffs.at(6);
3012
3013 Decay_amplitude_SVV result;
3014
3015 result.m_decay = mext1;
3016 result.m_vector_1 = mext2;
3017 result.m_vector_2 = mext3;
3018
3019 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-0.5)*
3020 CpS1cV4cV5*CpV2V4cV6*CpV3V5V6*(4*b0tmp1 + 20*c00tmp3 - 4*finite - 4*
3021 c0tmp2*Sqr(mext1) + c1tmp4*Sqr(mext1) + 4*c2tmp6*Sqr(mext1) + 6*c0tmp2*
3022 Sqr(mext2) + 5*c1tmp4*Sqr(mext2) + 2*c2tmp6*Sqr(mext2) + 4*c0tmp2*Sqr(
3023 mext3) - c1tmp4*Sqr(mext3) - 2*c2tmp6*Sqr(mext3) + 4*c0tmp2*Sqr(mLV4)));
3024 result.form_factor_11 = oneOver16PiSqr*(std::complex<double>(0,-1)*(5*c0tmp2
3025 + c1tmp4 + 10*(c12tmp5 + c22tmp7 + c2tmp6))*CpS1cV4cV5*CpV2V4cV6*
3026 CpV3V5V6);
3027 result.form_factor_21 = oneOver16PiSqr*(std::complex<double>(0,-1)*(5*c0tmp2
3028 + c1tmp4 + 10*(c12tmp5 + c22tmp7 + c2tmp6))*CpS1cV4cV5*CpV2V4cV6*
3029 CpV3V5V6);
3030 result.form_factor_12 = oneOver16PiSqr*(std::complex<double>(0,-1)*(5*c0tmp2
3031 + c1tmp4 + 10*(c12tmp5 + c22tmp7 + c2tmp6))*CpS1cV4cV5*CpV2V4cV6*
3032 CpV3V5V6);
3033 result.form_factor_22 = oneOver16PiSqr*(std::complex<double>(0,-1)*(5*c0tmp2
3034 + c1tmp4 + 10*(c12tmp5 + c22tmp7 + c2tmp6))*CpS1cV4cV5*CpV2V4cV6*
3035 CpV3V5V6);
3036
3037 return result;
3038}
3039
3053Decay_amplitude_SVV calculate_diagram_SVV_t2g1n11_VS(
3054 double mext1, double mext2, double mext3,
3055 double mIV4, double mLS5,
3056 const std::complex<double>& CpS1V2cV4, const std::complex<double>&
3057 CpcS5S5V3V4,
3058 double scale)
3059{
3060 auto& lib = Loop_library::get();
3061
3062 looplibrary::Acoeff_t A_coeffs;
3063 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
3064
3065 const auto a0tmp1 = A_coeffs.at(0);
3066
3067 Decay_amplitude_SVV result;
3068
3069 result.m_decay = mext1;
3070 result.m_vector_1 = mext2;
3071 result.m_vector_2 = mext3;
3072
3073 result.form_factor_g = oneOver16PiSqr*(0.5*a0tmp1*CpcS5S5V3V4*CpS1V2cV4*Den(
3074 Sqr(mext3),Sqr(mIV4)));
3075
3076 return result;
3077}
3078
3097Decay_amplitude_SVV calculate_diagram_SVV_t2g2n12_VV(
3098 double mext1, double mext2, double mext3,
3099 double mIV4, double mLV5,
3100 const std::complex<double>& CpS1V2cV4, const std::complex<double>&
3101 CpV3V4cV5V51, const std::complex<double>& CpV3V4cV5V52, const std::
3102 complex<double>& CpV3V4cV5V53,
3103 double scale, double finite)
3104{
3105 auto& lib = Loop_library::get();
3106
3107 looplibrary::Acoeff_t A_coeffs;
3108 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
3109
3110 const auto a0tmp1 = A_coeffs.at(0);
3111
3112 Decay_amplitude_SVV result;
3113
3114 result.m_decay = mext1;
3115 result.m_vector_1 = mext2;
3116 result.m_vector_2 = mext3;
3117
3118 result.form_factor_g = oneOver16PiSqr*(-0.5*CpS1V2cV4*Den(Sqr(mext3),Sqr(
3119 mIV4))*(a0tmp1*(4*CpV3V4cV5V51 + CpV3V4cV5V52 + CpV3V4cV5V53) - 2*
3120 CpV3V4cV5V51*finite*Sqr(mLV5)));
3121
3122 return result;
3123}
3124
3138Decay_amplitude_SVV calculate_diagram_SVV_t3g1n13_VS(
3139 double mext1, double mext2, double mext3,
3140 double mIV4, double mLS5,
3141 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
3142 CpcS5S5V2V4,
3143 double scale)
3144{
3145 auto& lib = Loop_library::get();
3146
3147 looplibrary::Acoeff_t A_coeffs;
3148 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
3149
3150 const auto a0tmp1 = A_coeffs.at(0);
3151
3152 Decay_amplitude_SVV result;
3153
3154 result.m_decay = mext1;
3155 result.m_vector_1 = mext2;
3156 result.m_vector_2 = mext3;
3157
3158 result.form_factor_g = oneOver16PiSqr*(0.5*a0tmp1*CpcS5S5V2V4*CpS1V3cV4*Den(
3159 Sqr(mext2),Sqr(mIV4)));
3160
3161 return result;
3162}
3163
3182Decay_amplitude_SVV calculate_diagram_SVV_t3g2n14_VV(
3183 double mext1, double mext2, double mext3,
3184 double mIV4, double mLV5,
3185 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
3186 CpV2V4cV5V51, const std::complex<double>& CpV2V4cV5V52, const std::
3187 complex<double>& CpV2V4cV5V53,
3188 double scale, double finite)
3189{
3190 auto& lib = Loop_library::get();
3191
3192 looplibrary::Acoeff_t A_coeffs;
3193 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
3194
3195 const auto a0tmp1 = A_coeffs.at(0);
3196
3197 Decay_amplitude_SVV result;
3198
3199 result.m_decay = mext1;
3200 result.m_vector_1 = mext2;
3201 result.m_vector_2 = mext3;
3202
3203 result.form_factor_g = oneOver16PiSqr*(-0.5*CpS1V3cV4*Den(Sqr(mext2),Sqr(
3204 mIV4))*(a0tmp1*(4*CpV2V4cV5V51 + CpV2V4cV5V52 + CpV2V4cV5V53) - 2*
3205 CpV2V4cV5V51*finite*Sqr(mLV5)));
3206
3207 return result;
3208}
3209
3223Decay_amplitude_SVV calculate_diagram_SVV_t4g1n15_SS(
3224 double mext1, double mext2, double mext3,
3225 double mLS4, double mLS5,
3226 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
3227 CpS4S5V2V3,
3228 double scale)
3229{
3230 auto& lib = Loop_library::get();
3231
3232 looplibrary::Bcoeff_t B_coeffs;
3233 lib.B(B_coeffs, mext1*mext1, mLS4*mLS4, mLS5*mLS5, scale*scale);
3234
3235 const auto b0tmp1 = B_coeffs.at(0);
3236
3237 Decay_amplitude_SVV result;
3238
3239 result.m_decay = mext1;
3240 result.m_vector_1 = mext2;
3241 result.m_vector_2 = mext3;
3242
3243 result.form_factor_g = oneOver16PiSqr*(-0.5*b0tmp1*CpS1cS4cS5*CpS4S5V2V3);
3244
3245 return result;
3246}
3247
3266Decay_amplitude_SVV calculate_diagram_SVV_t4g2n16_VV(
3267 double mext1, double mext2, double mext3,
3268 double mLV4, double mLV5,
3269 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
3270 CpV2V3V4V51, const std::complex<double>& CpV2V3V4V52, const std::complex<
3271 double>& CpV2V3V4V53,
3272 double scale, double finite)
3273{
3274 auto& lib = Loop_library::get();
3275
3276 looplibrary::Bcoeff_t B_coeffs;
3277 lib.B(B_coeffs, mext1*mext1, mLV4*mLV4, mLV5*mLV5, scale*scale);
3278
3279 const auto b0tmp1 = B_coeffs.at(0);
3280
3281 Decay_amplitude_SVV result;
3282
3283 result.m_decay = mext1;
3284 result.m_vector_1 = mext2;
3285 result.m_vector_2 = mext3;
3286
3287 result.form_factor_g = oneOver16PiSqr*(-0.5*b0tmp1*CpS1cV4cV5*(4*CpV2V3V4V51
3288 + CpV2V3V4V52 + CpV2V3V4V53) + CpS1cV4cV5*CpV2V3V4V51*finite);
3289
3290 return result;
3291}
3292
3306Decay_amplitude_SVV calculate_diagram_SVV_t5g1n17_SS(
3307 double mext1, double mext2, double mext3,
3308 double mIS4, double mLS5,
3309 const std::complex<double>& CpcS4V2V3, const std::complex<double>&
3310 CpS1S4cS5S5,
3311 double scale)
3312{
3313 auto& lib = Loop_library::get();
3314
3315 looplibrary::Acoeff_t A_coeffs;
3316 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
3317
3318 const auto a0tmp1 = A_coeffs.at(0);
3319
3320 Decay_amplitude_SVV result;
3321
3322 result.m_decay = mext1;
3323 result.m_vector_1 = mext2;
3324 result.m_vector_2 = mext3;
3325
3326 result.form_factor_g = oneOver16PiSqr*(-0.5*a0tmp1*CpcS4V2V3*CpS1S4cS5S5*Den
3327 (Sqr(mext1),Sqr(mIS4)));
3328
3329 return result;
3330}
3331
3345Decay_amplitude_SVV calculate_diagram_SVV_t5g2n18_SV(
3346 double mext1, double mext2, double mext3,
3347 double mIS4, double mLV5,
3348 const std::complex<double>& CpcS4V2V3, const std::complex<double>&
3349 CpS1S4cV5V5,
3350 double scale, double finite)
3351{
3352 auto& lib = Loop_library::get();
3353
3354 looplibrary::Acoeff_t A_coeffs;
3355 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
3356
3357 const auto a0tmp1 = A_coeffs.at(0);
3358
3359 Decay_amplitude_SVV result;
3360
3361 result.m_decay = mext1;
3362 result.m_vector_1 = mext2;
3363 result.m_vector_2 = mext3;
3364
3365 result.form_factor_g = oneOver16PiSqr*(CpcS4V2V3*CpS1S4cV5V5*Den(Sqr(mext1),
3366 Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
3367
3368 return result;
3369}
3370
3384Decay_amplitude_SVV calculate_diagram_SVV_t6g1n19_SV(
3385 double mext1, double mext2, double mext3,
3386 double mLS4, double mLV5,
3387 const std::complex<double>& CpcS4V2cV5, const std::complex<double>&
3388 CpS1S4V3V5,
3389 double scale)
3390{
3391 auto& lib = Loop_library::get();
3392
3393 looplibrary::Bcoeff_t B_coeffs;
3394 lib.B(B_coeffs, mext2*mext2, mLS4*mLS4, mLV5*mLV5, scale*scale);
3395
3396 const auto b0tmp1 = B_coeffs.at(0);
3397
3398 Decay_amplitude_SVV result;
3399
3400 result.m_decay = mext1;
3401 result.m_vector_1 = mext2;
3402 result.m_vector_2 = mext3;
3403
3404 result.form_factor_g = oneOver16PiSqr*(b0tmp1*CpcS4V2cV5*CpS1S4V3V5);
3405
3406 return result;
3407}
3408
3422Decay_amplitude_SVV calculate_diagram_SVV_t7g1n20_SV(
3423 double mext1, double mext2, double mext3,
3424 double mLS4, double mLV5,
3425 const std::complex<double>& CpcS4V3cV5, const std::complex<double>&
3426 CpS1S4V2V5,
3427 double scale)
3428{
3429 auto& lib = Loop_library::get();
3430
3431 looplibrary::Bcoeff_t B_coeffs;
3432 lib.B(B_coeffs, mext3*mext3, mLS4*mLS4, mLV5*mLV5, scale*scale);
3433
3434 const auto b0tmp1 = B_coeffs.at(0);
3435
3436 Decay_amplitude_SVV result;
3437
3438 result.m_decay = mext1;
3439 result.m_vector_1 = mext2;
3440 result.m_vector_2 = mext3;
3441
3442 result.form_factor_g = oneOver16PiSqr*(b0tmp1*CpcS4V3cV5*CpS1S4V2V5);
3443
3444 return result;
3445}
3446
3468Decay_amplitude_SVV calculate_diagram_SVV_t8g6n26_VFF(
3469 double mext1, double mext2, double mext3,
3470 double mIV4, double mLF5, double mLF6,
3471 const std::complex<double>& CpF5F6V4PL, const std::complex<double>&
3472 CpF5F6V4PR, const std::complex<double>& CpcF6cF5V3PL, const std::complex<
3473 double>& CpcF6cF5V3PR, const std::complex<double>& CpS1V2cV4,
3474 double scale)
3475{
3476 auto& lib = Loop_library::get();
3477
3478 looplibrary::Acoeff_t A_coeffs;
3479 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
3480
3481 looplibrary::Bcoeff_t B_coeffs;
3482 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
3483
3484 const auto a0tmp1 = A_coeffs.at(0);
3485 const auto b0tmp2 = B_coeffs.at(0);
3486 const auto b00tmp3 = B_coeffs.at(2);
3487 const auto b1tmp4 = B_coeffs.at(1);
3488
3489 Decay_amplitude_SVV result;
3490
3491 result.m_decay = mext1;
3492 result.m_vector_1 = mext2;
3493 result.m_vector_2 = mext3;
3494
3495 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1V2cV4*
3496 Den(Sqr(mext3),Sqr(mIV4))*(a0tmp1*(CpcF6cF5V3PL*CpF5F6V4PL + CpcF6cF5V3PR
3497 *CpF5F6V4PR) - 2*b00tmp3*(CpcF6cF5V3PL*CpF5F6V4PL + CpcF6cF5V3PR*
3498 CpF5F6V4PR) - b0tmp2*CpcF6cF5V3PR*CpF5F6V4PL*mLF5*mLF6 - b0tmp2*
3499 CpcF6cF5V3PL*CpF5F6V4PR*mLF5*mLF6 + b1tmp4*CpcF6cF5V3PL*CpF5F6V4PL*Sqr(
3500 mext3) + b1tmp4*CpcF6cF5V3PR*CpF5F6V4PR*Sqr(mext3) + b0tmp2*CpcF6cF5V3PL*
3501 CpF5F6V4PL*Sqr(mLF5) + b0tmp2*CpcF6cF5V3PR*CpF5F6V4PR*Sqr(mLF5)));
3502
3503 return result;
3504}
3505
3522Decay_amplitude_SVV calculate_diagram_SVV_t8g7n27_VSS(
3523 double mext1, double mext2, double mext3,
3524 double mIV4, double mLS5, double mLS6,
3525 const std::complex<double>& CpS1V2cV4, const std::complex<double>&
3526 CpcS5cS6V3, const std::complex<double>& CpS5S6V4,
3527 double scale)
3528{
3529 auto& lib = Loop_library::get();
3530
3531 looplibrary::Bcoeff_t B_coeffs;
3532 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLS6*mLS6, scale*scale);
3533
3534 const auto b00tmp1 = B_coeffs.at(2);
3535
3536 Decay_amplitude_SVV result;
3537
3538 result.m_decay = mext1;
3539 result.m_vector_1 = mext2;
3540 result.m_vector_2 = mext3;
3541
3542 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-2)*b00tmp1*
3543 CpcS5cS6V3*CpS1V2cV4*CpS5S6V4*Den(Sqr(mext3),Sqr(mIV4)));
3544
3545 return result;
3546}
3547
3563Decay_amplitude_SVV calculate_diagram_SVV_t8g8n28_VUU(
3564 double mext1, double mext2, double mext3,
3565 double mIV4, double mLU5, double mLU6,
3566 const std::complex<double>& CpS1V2cV4, const std::complex<double>& CpU5U6V4,
3567 const std::complex<double>& CpcU6cU5V3,
3568 double scale)
3569{
3570 auto& lib = Loop_library::get();
3571
3572 looplibrary::Bcoeff_t B_coeffs;
3573 lib.B(B_coeffs, mext3*mext3, mLU5*mLU5, mLU6*mLU6, scale*scale);
3574
3575 const auto b00tmp1 = B_coeffs.at(2);
3576
3577 Decay_amplitude_SVV result;
3578
3579 result.m_decay = mext1;
3580 result.m_vector_1 = mext2;
3581 result.m_vector_2 = mext3;
3582
3583 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b00tmp1*
3584 CpcU6cU5V3*CpS1V2cV4*CpU5U6V4*Den(Sqr(mext3),Sqr(mIV4)));
3585
3586 return result;
3587}
3588
3604Decay_amplitude_SVV calculate_diagram_SVV_t8g9n29_VSV(
3605 double mext1, double mext2, double mext3,
3606 double mIV4, double mLS5, double mLV6,
3607 const std::complex<double>& CpS1V2cV4, const std::complex<double>&
3608 CpcS5V3cV6, const std::complex<double>& CpS5V4V6,
3609 double scale)
3610{
3611 auto& lib = Loop_library::get();
3612
3613 looplibrary::Bcoeff_t B_coeffs;
3614 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
3615
3616 const auto b0tmp1 = B_coeffs.at(0);
3617
3618 Decay_amplitude_SVV result;
3619
3620 result.m_decay = mext1;
3621 result.m_vector_1 = mext2;
3622 result.m_vector_2 = mext3;
3623
3624 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*b0tmp1*
3625 CpcS5V3cV6*CpS1V2cV4*CpS5V4V6*Den(Sqr(mext3),Sqr(mIV4)));
3626
3627 return result;
3628}
3629
3649Decay_amplitude_SVV calculate_diagram_SVV_t8g10n30_VVV(
3650 double mext1, double mext2, double mext3,
3651 double mIV4, double mLV5, double mLV6,
3652 const std::complex<double>& CpS1V2cV4, const std::complex<double>&
3653 CpV3cV5cV6, const std::complex<double>& CpV4V5V6,
3654 double scale, double finite)
3655{
3656 auto& lib = Loop_library::get();
3657
3658 looplibrary::Acoeff_t A_coeffs;
3659 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
3660
3661 looplibrary::Bcoeff_t B_coeffs;
3662 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
3663
3664 const auto a0tmp1 = A_coeffs.at(0);
3665 const auto b0tmp2 = B_coeffs.at(0);
3666 const auto b00tmp3 = B_coeffs.at(2);
3667 const auto b1tmp4 = B_coeffs.at(1);
3668
3669 Decay_amplitude_SVV result;
3670
3671 result.m_decay = mext1;
3672 result.m_vector_1 = mext2;
3673 result.m_vector_2 = mext3;
3674
3675 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-
3676 0.16666666666666666)*CpS1V2cV4*CpV3cV5cV6*CpV4V5V6*(15*b0tmp2 + Den(Sqr(
3677 mext3),Sqr(mIV4))*(6*a0tmp1 + 30*b00tmp3 + 6*b1tmp4*Sqr(mext3) + 2*finite
3678 *Sqr(mext3) + 15*b0tmp2*Sqr(mIV4) + 6*b0tmp2*Sqr(mLV5) - 6*finite*Sqr(
3679 mLV5) - 6*finite*Sqr(mLV6))));
3680
3681 return result;
3682}
3683
3705Decay_amplitude_SVV calculate_diagram_SVV_t9g6n36_VFF(
3706 double mext1, double mext2, double mext3,
3707 double mIV4, double mLF5, double mLF6,
3708 const std::complex<double>& CpF5F6V4PL, const std::complex<double>&
3709 CpF5F6V4PR, const std::complex<double>& CpcF6cF5V2PL, const std::complex<
3710 double>& CpcF6cF5V2PR, const std::complex<double>& CpS1V3cV4,
3711 double scale)
3712{
3713 auto& lib = Loop_library::get();
3714
3715 looplibrary::Acoeff_t A_coeffs;
3716 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
3717
3718 looplibrary::Bcoeff_t B_coeffs;
3719 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLF6*mLF6, scale*scale);
3720
3721 const auto a0tmp1 = A_coeffs.at(0);
3722 const auto b0tmp2 = B_coeffs.at(0);
3723 const auto b00tmp3 = B_coeffs.at(2);
3724 const auto b1tmp4 = B_coeffs.at(1);
3725
3726 Decay_amplitude_SVV result;
3727
3728 result.m_decay = mext1;
3729 result.m_vector_1 = mext2;
3730 result.m_vector_2 = mext3;
3731
3732 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1V3cV4*
3733 Den(Sqr(mext2),Sqr(mIV4))*(a0tmp1*(CpcF6cF5V2PL*CpF5F6V4PL + CpcF6cF5V2PR
3734 *CpF5F6V4PR) - 2*b00tmp3*(CpcF6cF5V2PL*CpF5F6V4PL + CpcF6cF5V2PR*
3735 CpF5F6V4PR) - b0tmp2*CpcF6cF5V2PR*CpF5F6V4PL*mLF5*mLF6 - b0tmp2*
3736 CpcF6cF5V2PL*CpF5F6V4PR*mLF5*mLF6 + b1tmp4*CpcF6cF5V2PL*CpF5F6V4PL*Sqr(
3737 mext2) + b1tmp4*CpcF6cF5V2PR*CpF5F6V4PR*Sqr(mext2) + b0tmp2*CpcF6cF5V2PL*
3738 CpF5F6V4PL*Sqr(mLF5) + b0tmp2*CpcF6cF5V2PR*CpF5F6V4PR*Sqr(mLF5)));
3739
3740 return result;
3741}
3742
3759Decay_amplitude_SVV calculate_diagram_SVV_t9g7n37_VSS(
3760 double mext1, double mext2, double mext3,
3761 double mIV4, double mLS5, double mLS6,
3762 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
3763 CpcS5cS6V2, const std::complex<double>& CpS5S6V4,
3764 double scale)
3765{
3766 auto& lib = Loop_library::get();
3767
3768 looplibrary::Bcoeff_t B_coeffs;
3769 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLS6*mLS6, scale*scale);
3770
3771 const auto b00tmp1 = B_coeffs.at(2);
3772
3773 Decay_amplitude_SVV result;
3774
3775 result.m_decay = mext1;
3776 result.m_vector_1 = mext2;
3777 result.m_vector_2 = mext3;
3778
3779 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-2)*b00tmp1*
3780 CpcS5cS6V2*CpS1V3cV4*CpS5S6V4*Den(Sqr(mext2),Sqr(mIV4)));
3781
3782 return result;
3783}
3784
3800Decay_amplitude_SVV calculate_diagram_SVV_t9g8n38_VUU(
3801 double mext1, double mext2, double mext3,
3802 double mIV4, double mLU5, double mLU6,
3803 const std::complex<double>& CpS1V3cV4, const std::complex<double>& CpU5U6V4,
3804 const std::complex<double>& CpcU6cU5V2,
3805 double scale)
3806{
3807 auto& lib = Loop_library::get();
3808
3809 looplibrary::Bcoeff_t B_coeffs;
3810 lib.B(B_coeffs, mext2*mext2, mLU5*mLU5, mLU6*mLU6, scale*scale);
3811
3812 const auto b00tmp1 = B_coeffs.at(2);
3813
3814 Decay_amplitude_SVV result;
3815
3816 result.m_decay = mext1;
3817 result.m_vector_1 = mext2;
3818 result.m_vector_2 = mext3;
3819
3820 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b00tmp1*
3821 CpcU6cU5V2*CpS1V3cV4*CpU5U6V4*Den(Sqr(mext2),Sqr(mIV4)));
3822
3823 return result;
3824}
3825
3841Decay_amplitude_SVV calculate_diagram_SVV_t9g9n39_VSV(
3842 double mext1, double mext2, double mext3,
3843 double mIV4, double mLS5, double mLV6,
3844 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
3845 CpcS5V2cV6, const std::complex<double>& CpS5V4V6,
3846 double scale)
3847{
3848 auto& lib = Loop_library::get();
3849
3850 looplibrary::Bcoeff_t B_coeffs;
3851 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLV6*mLV6, scale*scale);
3852
3853 const auto b0tmp1 = B_coeffs.at(0);
3854
3855 Decay_amplitude_SVV result;
3856
3857 result.m_decay = mext1;
3858 result.m_vector_1 = mext2;
3859 result.m_vector_2 = mext3;
3860
3861 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*b0tmp1*
3862 CpcS5V2cV6*CpS1V3cV4*CpS5V4V6*Den(Sqr(mext2),Sqr(mIV4)));
3863
3864 return result;
3865}
3866
3886Decay_amplitude_SVV calculate_diagram_SVV_t9g10n40_VVV(
3887 double mext1, double mext2, double mext3,
3888 double mIV4, double mLV5, double mLV6,
3889 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
3890 CpV2cV5cV6, const std::complex<double>& CpV4V5V6,
3891 double scale, double finite)
3892{
3893 auto& lib = Loop_library::get();
3894
3895 looplibrary::Acoeff_t A_coeffs;
3896 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
3897
3898 looplibrary::Bcoeff_t B_coeffs;
3899 lib.B(B_coeffs, mext2*mext2, mLV5*mLV5, mLV6*mLV6, scale*scale);
3900
3901 const auto a0tmp1 = A_coeffs.at(0);
3902 const auto b0tmp2 = B_coeffs.at(0);
3903 const auto b00tmp3 = B_coeffs.at(2);
3904 const auto b1tmp4 = B_coeffs.at(1);
3905
3906 Decay_amplitude_SVV result;
3907
3908 result.m_decay = mext1;
3909 result.m_vector_1 = mext2;
3910 result.m_vector_2 = mext3;
3911
3912 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-
3913 0.16666666666666666)*CpS1V3cV4*CpV2cV5cV6*CpV4V5V6*(15*b0tmp2 + Den(Sqr(
3914 mext2),Sqr(mIV4))*(6*a0tmp1 + 30*b00tmp3 + 6*b1tmp4*Sqr(mext2) + 2*finite
3915 *Sqr(mext2) + 15*b0tmp2*Sqr(mIV4) + 6*b0tmp2*Sqr(mLV5) - 6*finite*Sqr(
3916 mLV5) - 6*finite*Sqr(mLV6))));
3917
3918 return result;
3919}
3920
3938Decay_amplitude_SVV calculate_diagram_SVV_t10g1n41_SFF(
3939 double mext1, double mext2, double mext3,
3940 double mIS4, double mLF5, double mLF6,
3941 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
3942 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
3943 double>& CpcF6cF5S1PR, const std::complex<double>& CpcS4V2V3,
3944 double scale)
3945{
3946 auto& lib = Loop_library::get();
3947
3948 looplibrary::Acoeff_t A_coeffs;
3949 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
3950
3951 looplibrary::Bcoeff_t B_coeffs;
3952 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
3953
3954 const auto a0tmp1 = A_coeffs.at(0);
3955 const auto b0tmp2 = B_coeffs.at(0);
3956 const auto b1tmp3 = B_coeffs.at(1);
3957
3958 Decay_amplitude_SVV result;
3959
3960 result.m_decay = mext1;
3961 result.m_vector_1 = mext2;
3962 result.m_vector_2 = mext3;
3963
3964 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpcS4V2V3*
3965 Den(Sqr(mext1),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S1PR*CpF5F6S4PL*mLF5 +
3966 CpcF6cF5S1PL*CpF5F6S4PR*mLF5 + CpcF6cF5S1PL*CpF5F6S4PL*mLF6 +
3967 CpcF6cF5S1PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S1PR*CpF5F6S4PL + CpcF6cF5S1PL*
3968 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext1))));
3969
3970 return result;
3971}
3972
3988Decay_amplitude_SVV calculate_diagram_SVV_t10g2n42_SSS(
3989 double mext1, double mext2, double mext3,
3990 double mIS4, double mLS5, double mLS6,
3991 const std::complex<double>& CpS1cS5cS6, const std::complex<double>&
3992 CpcS4V2V3, const std::complex<double>& CpS4S5S6,
3993 double scale)
3994{
3995 auto& lib = Loop_library::get();
3996
3997 looplibrary::Bcoeff_t B_coeffs;
3998 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
3999
4000 const auto b0tmp1 = B_coeffs.at(0);
4001
4002 Decay_amplitude_SVV result;
4003
4004 result.m_decay = mext1;
4005 result.m_vector_1 = mext2;
4006 result.m_vector_2 = mext3;
4007
4008 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b0tmp1*
4009 CpcS4V2V3*CpS1cS5cS6*CpS4S5S6*Den(Sqr(mext1),Sqr(mIS4)));
4010
4011 return result;
4012}
4013
4029Decay_amplitude_SVV calculate_diagram_SVV_t10g3n43_SUU(
4030 double mext1, double mext2, double mext3,
4031 double mIS4, double mLU5, double mLU6,
4032 const std::complex<double>& CpS1cU6cU5, const std::complex<double>&
4033 CpcS4V2V3, const std::complex<double>& CpS4U5U6,
4034 double scale)
4035{
4036 auto& lib = Loop_library::get();
4037
4038 looplibrary::Bcoeff_t B_coeffs;
4039 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
4040
4041 const auto b0tmp1 = B_coeffs.at(0);
4042
4043 Decay_amplitude_SVV result;
4044
4045 result.m_decay = mext1;
4046 result.m_vector_1 = mext2;
4047 result.m_vector_2 = mext3;
4048
4049 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,0.5)*b0tmp1*
4050 CpcS4V2V3*CpS1cU6cU5*CpS4U5U6*Den(Sqr(mext1),Sqr(mIS4)));
4051
4052 return result;
4053}
4054
4071Decay_amplitude_SVV calculate_diagram_SVV_t10g4n44_SSV(
4072 double mext1, double mext2, double mext3,
4073 double mIS4, double mLS5, double mLV6,
4074 const std::complex<double>& CpS1cS5cV6, const std::complex<double>&
4075 CpcS4V2V3, const std::complex<double>& CpS4S5V6,
4076 double scale)
4077{
4078 auto& lib = Loop_library::get();
4079
4080 looplibrary::Acoeff_t A_coeffs;
4081 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
4082
4083 looplibrary::Bcoeff_t B_coeffs;
4084 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
4085
4086 const auto a0tmp1 = A_coeffs.at(0);
4087 const auto b0tmp2 = B_coeffs.at(0);
4088 const auto b1tmp3 = B_coeffs.at(1);
4089
4090 Decay_amplitude_SVV result;
4091
4092 result.m_decay = mext1;
4093 result.m_vector_1 = mext2;
4094 result.m_vector_2 = mext3;
4095
4096 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*CpcS4V2V3*
4097 CpS1cS5cV6*CpS4S5V6*Den(Sqr(mext1),Sqr(mIS4))*(a0tmp1 - 2*b1tmp3*Sqr(
4098 mext1) + b0tmp2*(Sqr(mext1) + Sqr(mLS5))));
4099
4100 return result;
4101}
4102
4118Decay_amplitude_SVV calculate_diagram_SVV_t10g5n45_SVV(
4119 double mext1, double mext2, double mext3,
4120 double mIS4, double mLV5, double mLV6,
4121 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
4122 CpcS4V2V3, const std::complex<double>& CpS4V5V6,
4123 double scale, double finite)
4124{
4125 auto& lib = Loop_library::get();
4126
4127 looplibrary::Bcoeff_t B_coeffs;
4128 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
4129
4130 const auto b0tmp1 = B_coeffs.at(0);
4131
4132 Decay_amplitude_SVV result;
4133
4134 result.m_decay = mext1;
4135 result.m_vector_1 = mext2;
4136 result.m_vector_2 = mext3;
4137
4138 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1)*CpcS4V2V3*
4139 CpS1cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext1),Sqr(mIS4)));
4140
4141 return result;
4142}
4143
4165Decay_amplitude_SVV calculate_diagram_SVV_t10g6n46_VFF(
4166 double mext1, double mext2, double mext3,
4167 double mIV4, double mLF5, double mLF6,
4168 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
4169 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
4170 double>& CpcF6cF5S1PR, const std::complex<double>& CpV2V3cV4,
4171 double scale)
4172{
4173 auto& lib = Loop_library::get();
4174
4175 looplibrary::Bcoeff_t B_coeffs;
4176 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
4177
4178 const auto b0tmp1 = B_coeffs.at(0);
4179 const auto b1tmp2 = B_coeffs.at(1);
4180
4181 Decay_amplitude_SVV result;
4182
4183 result.m_decay = mext1;
4184 result.m_vector_1 = mext2;
4185 result.m_vector_2 = mext3;
4186
4187 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*CpV2V3cV4*
4188 (b0tmp1*(CpcF6cF5S1PR*CpF5F6V4PL + CpcF6cF5S1PL*CpF5F6V4PR)*mLF5 + b1tmp2
4189 *(CpcF6cF5S1PR*CpF5F6V4PL*mLF5 + CpcF6cF5S1PL*CpF5F6V4PR*mLF5 +
4190 CpcF6cF5S1PL*CpF5F6V4PL*mLF6 + CpcF6cF5S1PR*CpF5F6V4PR*mLF6))*Den(Sqr(
4191 mext1),Sqr(mIV4))*(Sqr(mext2) - Sqr(mext3)));
4192
4193 return result;
4194}
4195
4213Decay_amplitude_SVV calculate_diagram_SVV_t10g7n47_VSS(
4214 double mext1, double mext2, double mext3,
4215 double mIV4, double mLS5, double mLS6,
4216 const std::complex<double>& CpS1cS5cS6, const std::complex<double>& CpS5S6V4
4217 , const std::complex<double>& CpV2V3cV4,
4218 double scale)
4219{
4220 auto& lib = Loop_library::get();
4221
4222 looplibrary::Bcoeff_t B_coeffs;
4223 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
4224
4225 const auto b0tmp1 = B_coeffs.at(0);
4226 const auto b1tmp2 = B_coeffs.at(1);
4227
4228 Decay_amplitude_SVV result;
4229
4230 result.m_decay = mext1;
4231 result.m_vector_1 = mext2;
4232 result.m_vector_2 = mext3;
4233
4234 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-0.5)*(b0tmp1
4235 + 2*b1tmp2)*CpS1cS5cS6*CpS5S6V4*CpV2V3cV4*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
4236 mext2) - Sqr(mext3)));
4237
4238 return result;
4239}
4240
4258Decay_amplitude_SVV calculate_diagram_SVV_t10g8n48_VUU(
4259 double mext1, double mext2, double mext3,
4260 double mIV4, double mLU5, double mLU6,
4261 const std::complex<double>& CpS1cU6cU5, const std::complex<double>& CpU5U6V4
4262 , const std::complex<double>& CpV2V3cV4,
4263 double scale)
4264{
4265 auto& lib = Loop_library::get();
4266
4267 looplibrary::Bcoeff_t B_coeffs;
4268 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
4269
4270 const auto b1tmp1 = B_coeffs.at(1);
4271
4272 Decay_amplitude_SVV result;
4273
4274 result.m_decay = mext1;
4275 result.m_vector_1 = mext2;
4276 result.m_vector_2 = mext3;
4277
4278 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,0.5)*b1tmp1*
4279 CpS1cU6cU5*CpU5U6V4*CpV2V3cV4*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(mext2) - Sqr
4280 (mext3)));
4281
4282 return result;
4283}
4284
4303Decay_amplitude_SVV calculate_diagram_SVV_t10g9n49_VSV(
4304 double mext1, double mext2, double mext3,
4305 double mIV4, double mLS5, double mLV6,
4306 const std::complex<double>& CpS1cS5cV6, const std::complex<double>& CpS5V4V6
4307 , const std::complex<double>& CpV2V3cV4,
4308 double scale)
4309{
4310 auto& lib = Loop_library::get();
4311
4312 looplibrary::Bcoeff_t B_coeffs;
4313 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
4314
4315 const auto b0tmp1 = B_coeffs.at(0);
4316 const auto b1tmp2 = B_coeffs.at(1);
4317
4318 Decay_amplitude_SVV result;
4319
4320 result.m_decay = mext1;
4321 result.m_vector_1 = mext2;
4322 result.m_vector_2 = mext3;
4323
4324 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,-1)*(b0tmp1 -
4325 b1tmp2)*CpS1cS5cV6*CpS5V4V6*CpV2V3cV4*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
4326 mext2) - Sqr(mext3)));
4327
4328 return result;
4329}
4330
4350Decay_amplitude_SVV calculate_diagram_SVV_t10g10n50_VVV(
4351 double mext1, double mext2, double mext3,
4352 double mIV4, double mLV5, double mLV6,
4353 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
4354 CpV2V3cV4, const std::complex<double>& CpV4V5V6,
4355 double scale)
4356{
4357 auto& lib = Loop_library::get();
4358
4359 looplibrary::Bcoeff_t B_coeffs;
4360 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
4361
4362 const auto b0tmp1 = B_coeffs.at(0);
4363 const auto b1tmp2 = B_coeffs.at(1);
4364
4365 Decay_amplitude_SVV result;
4366
4367 result.m_decay = mext1;
4368 result.m_vector_1 = mext2;
4369 result.m_vector_2 = mext3;
4370
4371 result.form_factor_g = oneOver16PiSqr*(std::complex<double>(0,1.5)*(b0tmp1 +
4372 2*b1tmp2)*CpS1cV5cV6*CpV2V3cV4*CpV4V5V6*Den(Sqr(mext1),Sqr(mIV4))*(Sqr(
4373 mext2) - Sqr(mext3)));
4374
4375 return result;
4376}
4377
4398Decay_amplitude_SSV calculate_diagram_SSV_t1g1n1_FFF(
4399 double mext1, double mext2, double mext3,
4400 double mLF4, double mLF5, double mLF6,
4401 const std::complex<double>& CpcF4cF5S1PL, const std::complex<double>&
4402 CpcF4cF5S1PR, const std::complex<double>& CpF5F6V3PL, const std::complex<
4403 double>& CpF5F6V3PR, const std::complex<double>& CpcF6F4S2PL, const std::
4404 complex<double>& CpcF6F4S2PR,
4405 double scale)
4406{
4407 auto& lib = Loop_library::get();
4408
4409 looplibrary::Bcoeff_t B_coeffs;
4410 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
4411
4412 looplibrary::Ccoeff_t C_coeffs;
4413 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLF4*mLF4, mLF6*mLF6,
4414 mLF5*mLF5, scale*scale);
4415
4416 const auto b0tmp1 = B_coeffs.at(0);
4417 const auto c0tmp2 = C_coeffs.at(0);
4418 const auto c1tmp3 = C_coeffs.at(1);
4419 const auto c2tmp4 = C_coeffs.at(2);
4420
4421 Decay_amplitude_SSV result;
4422
4423 result.m_decay = mext1;
4424 result.m_scalar = mext2;
4425 result.m_vector = mext3;
4426
4427 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*(b0tmp1*
4428 CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6V3PL + b0tmp1*CpcF4cF5S1PR*CpcF6F4S2PL*
4429 CpF5F6V3PR + c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PR*CpF5F6V3PL*mLF4*mLF5 +
4430 c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6V3PR*mLF4*mLF5 + c2tmp4*
4431 CpcF4cF5S1PL*CpcF6F4S2PL*CpF5F6V3PL*mLF4*mLF6 + c2tmp4*CpcF4cF5S1PR*
4432 CpcF6F4S2PR*CpF5F6V3PR*mLF4*mLF6 + c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PL*
4433 CpF5F6V3PL*mLF5*mLF6 + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6V3PR*mLF5*
4434 mLF6 + c0tmp2*mLF4*(CpcF4cF5S1PL*(2*CpcF6F4S2PR*CpF5F6V3PL*mLF4 +
4435 CpcF6F4S2PL*CpF5F6V3PR*mLF5 + CpcF6F4S2PL*CpF5F6V3PL*mLF6) + CpcF4cF5S1PR
4436 *(2*CpcF6F4S2PL*CpF5F6V3PR*mLF4 + CpcF6F4S2PR*CpF5F6V3PL*mLF5 +
4437 CpcF6F4S2PR*CpF5F6V3PR*mLF6)) + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*
4438 CpF5F6V3PL*Sqr(mext1) + c2tmp4*CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6V3PR*Sqr(
4439 mext1) + c2tmp4*CpcF4cF5S1PL*CpcF6F4S2PR*CpF5F6V3PL*Sqr(mLF4) + c2tmp4*
4440 CpcF4cF5S1PR*CpcF6F4S2PL*CpF5F6V3PR*Sqr(mLF4) + c1tmp3*(CpcF4cF5S1PL*
4441 CpcF6F4S2PL*mLF4*(CpF5F6V3PR*mLF5 + CpF5F6V3PL*mLF6) + CpcF4cF5S1PR*
4442 CpcF6F4S2PR*mLF4*(CpF5F6V3PL*mLF5 + CpF5F6V3PR*mLF6) + CpcF4cF5S1PL*
4443 CpcF6F4S2PR*(CpF5F6V3PR*mLF5*mLF6 + CpF5F6V3PL*(Sqr(mext2) + Sqr(mLF4)))
4444 + CpcF4cF5S1PR*CpcF6F4S2PL*(CpF5F6V3PL*mLF5*mLF6 + CpF5F6V3PR*(Sqr(mext2)
4445 + Sqr(mLF4))))));
4446
4447 return result;
4448}
4449
4465Decay_amplitude_SSV calculate_diagram_SSV_t1g2n2_SSS(
4466 double mext1, double mext2, double mext3,
4467 double mLS4, double mLS5, double mLS6,
4468 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
4469 CpS2S4cS6, const std::complex<double>& CpS5S6V3,
4470 double scale)
4471{
4472 auto& lib = Loop_library::get();
4473
4474 looplibrary::Ccoeff_t C_coeffs;
4475 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
4476 mLS5*mLS5, scale*scale);
4477
4478 const auto c0tmp1 = C_coeffs.at(0);
4479 const auto c1tmp2 = C_coeffs.at(1);
4480 const auto c2tmp3 = C_coeffs.at(2);
4481
4482 Decay_amplitude_SSV result;
4483
4484 result.m_decay = mext1;
4485 result.m_scalar = mext2;
4486 result.m_vector = mext3;
4487
4488 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*(c0tmp1 +
4489 c1tmp2 + c2tmp3)*CpS1cS4cS5*CpS2S4cS6*CpS5S6V3);
4490
4491 return result;
4492}
4493
4509Decay_amplitude_SSV calculate_diagram_SSV_t1g3n3_UUU(
4510 double mext1, double mext2, double mext3,
4511 double mLU4, double mLU5, double mLU6,
4512 const std::complex<double>& CpS1cU4cU5, const std::complex<double>&
4513 CpS2cU6U4, const std::complex<double>& CpU5U6V3,
4514 double scale)
4515{
4516 auto& lib = Loop_library::get();
4517
4518 looplibrary::Ccoeff_t C_coeffs;
4519 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLU4*mLU4, mLU6*mLU6,
4520 mLU5*mLU5, scale*scale);
4521
4522 const auto c0tmp1 = C_coeffs.at(0);
4523 const auto c1tmp2 = C_coeffs.at(1);
4524 const auto c2tmp3 = C_coeffs.at(2);
4525
4526 Decay_amplitude_SSV result;
4527
4528 result.m_decay = mext1;
4529 result.m_scalar = mext2;
4530 result.m_vector = mext3;
4531
4532 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(c0tmp1 +
4533 c1tmp2 + c2tmp3)*CpS1cU4cU5*CpS2cU6U4*CpU5U6V3);
4534
4535 return result;
4536}
4537
4553Decay_amplitude_SSV calculate_diagram_SSV_t1g4n4_SSV(
4554 double mext1, double mext2, double mext3,
4555 double mLS4, double mLS5, double mLV6,
4556 const std::complex<double>& CpS1cS4cS5, const std::complex<double>&
4557 CpS2S4cV6, const std::complex<double>& CpS5V3V6,
4558 double scale)
4559{
4560 auto& lib = Loop_library::get();
4561
4562 looplibrary::Ccoeff_t C_coeffs;
4563 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
4564 mLS5*mLS5, scale*scale);
4565
4566 const auto c0tmp1 = C_coeffs.at(0);
4567 const auto c1tmp2 = C_coeffs.at(1);
4568 const auto c2tmp3 = C_coeffs.at(2);
4569
4570 Decay_amplitude_SSV result;
4571
4572 result.m_decay = mext1;
4573 result.m_scalar = mext2;
4574 result.m_vector = mext3;
4575
4576 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*(c0tmp1 -
4577 c1tmp2 - c2tmp3)*CpS1cS4cS5*CpS2S4cV6*CpS5V3V6);
4578
4579 return result;
4580}
4581
4598Decay_amplitude_SSV calculate_diagram_SSV_t1g5n5_SVS(
4599 double mext1, double mext2, double mext3,
4600 double mLS4, double mLV5, double mLS6,
4601 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
4602 CpS2S4cS6, const std::complex<double>& CpS6V3V5,
4603 double scale)
4604{
4605 auto& lib = Loop_library::get();
4606
4607 looplibrary::Ccoeff_t C_coeffs;
4608 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLS6*mLS6,
4609 mLV5*mLV5, scale*scale);
4610
4611 const auto c0tmp1 = C_coeffs.at(0);
4612 const auto c1tmp2 = C_coeffs.at(1);
4613 const auto c2tmp3 = C_coeffs.at(2);
4614
4615 Decay_amplitude_SSV result;
4616
4617 result.m_decay = mext1;
4618 result.m_scalar = mext2;
4619 result.m_vector = mext3;
4620
4621 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(c0tmp1 -
4622 c1tmp2 - c2tmp3)*CpS1cS4cV5*CpS2S4cS6*CpS6V3V5);
4623
4624 return result;
4625}
4626
4643Decay_amplitude_SSV calculate_diagram_SSV_t1g6n6_VSS(
4644 double mext1, double mext2, double mext3,
4645 double mLV4, double mLS5, double mLS6,
4646 const std::complex<double>& CpS1cS5cV4, const std::complex<double>&
4647 CpS2cS6V4, const std::complex<double>& CpS5S6V3,
4648 double scale)
4649{
4650 auto& lib = Loop_library::get();
4651
4652 looplibrary::Ccoeff_t C_coeffs;
4653 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
4654 mLS5*mLS5, scale*scale);
4655
4656 const auto c0tmp1 = C_coeffs.at(0);
4657 const auto c00tmp2 = C_coeffs.at(3);
4658 const auto c1tmp3 = C_coeffs.at(1);
4659 const auto c11tmp4 = C_coeffs.at(4);
4660 const auto c12tmp5 = C_coeffs.at(5);
4661 const auto c2tmp6 = C_coeffs.at(2);
4662 const auto c22tmp7 = C_coeffs.at(6);
4663
4664 Decay_amplitude_SSV result;
4665
4666 result.m_decay = mext1;
4667 result.m_scalar = mext2;
4668 result.m_vector = mext3;
4669
4670 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*CpS1cS5cV4*
4671 CpS2cS6V4*CpS5S6V3*(4*c00tmp2 + c11tmp4*Sqr(mext1) + 4*c12tmp5*Sqr(mext1)
4672 + 3*c1tmp3*Sqr(mext1) + 3*c22tmp7*Sqr(mext1) + 5*c2tmp6*Sqr(mext1) + 3*
4673 c11tmp4*Sqr(mext2) + 4*c12tmp5*Sqr(mext2) + 5*c1tmp3*Sqr(mext2) + c22tmp7
4674 *Sqr(mext2) + 3*c2tmp6*Sqr(mext2) - c11tmp4*Sqr(mext3) - 2*c12tmp5*Sqr(
4675 mext3) - 3*c1tmp3*Sqr(mext3) - c22tmp7*Sqr(mext3) - 3*c2tmp6*Sqr(mext3) +
4676 c1tmp3*Sqr(mLV4) + c2tmp6*Sqr(mLV4) + c0tmp1*(2*(Sqr(mext1) + Sqr(mext2)
4677 - Sqr(mext3)) + Sqr(mLV4))));
4678
4679 return result;
4680}
4681
4700Decay_amplitude_SSV calculate_diagram_SSV_t1g7n7_SVV(
4701 double mext1, double mext2, double mext3,
4702 double mLS4, double mLV5, double mLV6,
4703 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
4704 CpS2S4cV6, const std::complex<double>& CpV3V5V6,
4705 double scale)
4706{
4707 auto& lib = Loop_library::get();
4708
4709 looplibrary::Bcoeff_t B_coeffs;
4710 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
4711
4712 looplibrary::Ccoeff_t C_coeffs;
4713 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLS4*mLS4, mLV6*mLV6,
4714 mLV5*mLV5, scale*scale);
4715
4716 const auto b0tmp1 = B_coeffs.at(0);
4717 const auto c0tmp2 = C_coeffs.at(0);
4718 const auto c00tmp3 = C_coeffs.at(3);
4719 const auto c1tmp4 = C_coeffs.at(1);
4720 const auto c11tmp5 = C_coeffs.at(4);
4721 const auto c12tmp6 = C_coeffs.at(5);
4722 const auto c2tmp7 = C_coeffs.at(2);
4723 const auto c22tmp8 = C_coeffs.at(6);
4724
4725 Decay_amplitude_SSV result;
4726
4727 result.m_decay = mext1;
4728 result.m_scalar = mext2;
4729 result.m_vector = mext3;
4730
4731 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS1cS4cV5*
4732 CpS2S4cV6*CpV3V5V6*(4*b0tmp1 - 4*c00tmp3 - c11tmp5*Sqr(mext1) - 4*c12tmp6
4733 *Sqr(mext1) + c1tmp4*Sqr(mext1) - 3*c22tmp8*Sqr(mext1) - c2tmp7*Sqr(mext1
4734 ) - 3*c11tmp5*Sqr(mext2) - 4*c12tmp6*Sqr(mext2) - c1tmp4*Sqr(mext2) -
4735 c22tmp8*Sqr(mext2) + c2tmp7*Sqr(mext2) + c0tmp2*Sqr(mext3) + c11tmp5*Sqr(
4736 mext3) + 2*c12tmp6*Sqr(mext3) - 2*c1tmp4*Sqr(mext3) + c22tmp8*Sqr(mext3)
4737 - 2*c2tmp7*Sqr(mext3) + 4*c0tmp2*Sqr(mLS4)));
4738
4739 return result;
4740}
4741
4758Decay_amplitude_SSV calculate_diagram_SSV_t1g8n8_VSV(
4759 double mext1, double mext2, double mext3,
4760 double mLV4, double mLS5, double mLV6,
4761 const std::complex<double>& CpS1cS5cV4, const std::complex<double>&
4762 CpS2V4cV6, const std::complex<double>& CpS5V3V6,
4763 double scale)
4764{
4765 auto& lib = Loop_library::get();
4766
4767 looplibrary::Ccoeff_t C_coeffs;
4768 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
4769 mLS5*mLS5, scale*scale);
4770
4771 const auto c0tmp1 = C_coeffs.at(0);
4772 const auto c1tmp2 = C_coeffs.at(1);
4773 const auto c2tmp3 = C_coeffs.at(2);
4774
4775 Decay_amplitude_SSV result;
4776
4777 result.m_decay = mext1;
4778 result.m_scalar = mext2;
4779 result.m_vector = mext3;
4780
4781 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*(2*c0tmp1 +
4782 c1tmp2 + c2tmp3)*CpS1cS5cV4*CpS2V4cV6*CpS5V3V6);
4783
4784 return result;
4785}
4786
4802Decay_amplitude_SSV calculate_diagram_SSV_t1g9n9_VVS(
4803 double mext1, double mext2, double mext3,
4804 double mLV4, double mLV5, double mLS6,
4805 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
4806 CpS2cS6V4, const std::complex<double>& CpS6V3V5,
4807 double scale)
4808{
4809 auto& lib = Loop_library::get();
4810
4811 looplibrary::Ccoeff_t C_coeffs;
4812 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLS6*mLS6,
4813 mLV5*mLV5, scale*scale);
4814
4815 const auto c0tmp1 = C_coeffs.at(0);
4816 const auto c1tmp2 = C_coeffs.at(1);
4817 const auto c2tmp3 = C_coeffs.at(2);
4818
4819 Decay_amplitude_SSV result;
4820
4821 result.m_decay = mext1;
4822 result.m_scalar = mext2;
4823 result.m_vector = mext3;
4824
4825 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(2*c0tmp1 +
4826 c1tmp2 + c2tmp3)*CpS1cV4cV5*CpS2cS6V4*CpS6V3V5);
4827
4828 return result;
4829}
4830
4848Decay_amplitude_SSV calculate_diagram_SSV_t1g10n10_VVV(
4849 double mext1, double mext2, double mext3,
4850 double mLV4, double mLV5, double mLV6,
4851 const std::complex<double>& CpS1cV4cV5, const std::complex<double>&
4852 CpS2V4cV6, const std::complex<double>& CpV3V5V6,
4853 double scale)
4854{
4855 auto& lib = Loop_library::get();
4856
4857 looplibrary::Ccoeff_t C_coeffs;
4858 lib.C(C_coeffs, mext2*mext2, mext3*mext3, mext1*mext1, mLV4*mLV4, mLV6*mLV6,
4859 mLV5*mLV5, scale*scale);
4860
4861 const auto c0tmp1 = C_coeffs.at(0);
4862 const auto c1tmp2 = C_coeffs.at(1);
4863 const auto c2tmp3 = C_coeffs.at(2);
4864
4865 Decay_amplitude_SSV result;
4866
4867 result.m_decay = mext1;
4868 result.m_scalar = mext2;
4869 result.m_vector = mext3;
4870
4871 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-6)*(c0tmp1 +
4872 c1tmp2 + c2tmp3)*CpS1cV4cV5*CpS2V4cV6*CpV3V5V6);
4873
4874 return result;
4875}
4876
4890Decay_amplitude_SSV calculate_diagram_SSV_t2g1n11_VS(
4891 double mext1, double mext2, double mext3,
4892 double mIV4, double mLS5,
4893 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
4894 CpcS5S5V3V4,
4895 double scale)
4896{
4897 auto& lib = Loop_library::get();
4898
4899 looplibrary::Acoeff_t A_coeffs;
4900 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
4901
4902 const auto a0tmp1 = A_coeffs.at(0);
4903
4904 Decay_amplitude_SSV result;
4905
4906 result.m_decay = mext1;
4907 result.m_scalar = mext2;
4908 result.m_vector = mext3;
4909
4910 result.form_factor = oneOver16PiSqr*(a0tmp1*CpcS5S5V3V4*CpS1S2cV4*Den(Sqr(
4911 mext3),Sqr(mIV4)));
4912
4913 return result;
4914}
4915
4934Decay_amplitude_SSV calculate_diagram_SSV_t2g2n12_VV(
4935 double mext1, double mext2, double mext3,
4936 double mIV4, double mLV5,
4937 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
4938 CpV3V4cV5V51, const std::complex<double>& CpV3V4cV5V52, const std::
4939 complex<double>& CpV3V4cV5V53,
4940 double scale, double finite)
4941{
4942 auto& lib = Loop_library::get();
4943
4944 looplibrary::Acoeff_t A_coeffs;
4945 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
4946
4947 const auto a0tmp1 = A_coeffs.at(0);
4948
4949 Decay_amplitude_SSV result;
4950
4951 result.m_decay = mext1;
4952 result.m_scalar = mext2;
4953 result.m_vector = mext3;
4954
4955 result.form_factor = oneOver16PiSqr*(-(CpS1S2cV4*Den(Sqr(mext3),Sqr(mIV4))*(
4956 a0tmp1*(4*CpV3V4cV5V51 + CpV3V4cV5V52 + CpV3V4cV5V53) - 2*CpV3V4cV5V51*
4957 finite*Sqr(mLV5))));
4958
4959 return result;
4960}
4961
4975Decay_amplitude_SSV calculate_diagram_SSV_t3g1n13_SS(
4976 double mext1, double mext2, double mext3,
4977 double mIS4, double mLS5,
4978 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
4979 CpS2S4cS5S5,
4980 double scale)
4981{
4982 auto& lib = Loop_library::get();
4983
4984 looplibrary::Acoeff_t A_coeffs;
4985 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
4986
4987 const auto a0tmp1 = A_coeffs.at(0);
4988
4989 Decay_amplitude_SSV result;
4990
4991 result.m_decay = mext1;
4992 result.m_scalar = mext2;
4993 result.m_vector = mext3;
4994
4995 result.form_factor = oneOver16PiSqr*(-(a0tmp1*CpS1cS4V3*CpS2S4cS5S5*Den(Sqr(
4996 mext2),Sqr(mIS4))));
4997
4998 return result;
4999}
5000
5014Decay_amplitude_SSV calculate_diagram_SSV_t3g2n14_SV(
5015 double mext1, double mext2, double mext3,
5016 double mIS4, double mLV5,
5017 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
5018 CpS2S4cV5V5,
5019 double scale, double finite)
5020{
5021 auto& lib = Loop_library::get();
5022
5023 looplibrary::Acoeff_t A_coeffs;
5024 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
5025
5026 const auto a0tmp1 = A_coeffs.at(0);
5027
5028 Decay_amplitude_SSV result;
5029
5030 result.m_decay = mext1;
5031 result.m_scalar = mext2;
5032 result.m_vector = mext3;
5033
5034 result.form_factor = oneOver16PiSqr*(2*CpS1cS4V3*CpS2S4cV5V5*Den(Sqr(mext2),
5035 Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
5036
5037 return result;
5038}
5039
5054Decay_amplitude_SSV calculate_diagram_SSV_t4g1n15_SV(
5055 double mext1, double mext2, double mext3,
5056 double mLS4, double mLV5,
5057 const std::complex<double>& CpS1cS4cV5, const std::complex<double>&
5058 CpS2S4V3V5,
5059 double scale)
5060{
5061 auto& lib = Loop_library::get();
5062
5063 looplibrary::Bcoeff_t B_coeffs;
5064 lib.B(B_coeffs, mext1*mext1, mLS4*mLS4, mLV5*mLV5, scale*scale);
5065
5066 const auto b0tmp1 = B_coeffs.at(0);
5067 const auto b1tmp2 = B_coeffs.at(1);
5068
5069 Decay_amplitude_SSV result;
5070
5071 result.m_decay = mext1;
5072 result.m_scalar = mext2;
5073 result.m_vector = mext3;
5074
5075 result.form_factor = oneOver16PiSqr*((b0tmp1 - b1tmp2)*CpS1cS4cV5*CpS2S4V3V5
5076 );
5077
5078 return result;
5079}
5080
5094Decay_amplitude_SSV calculate_diagram_SSV_t5g1n16_SS(
5095 double mext1, double mext2, double mext3,
5096 double mIS4, double mLS5,
5097 const std::complex<double>& CpS2cS4V3, const std::complex<double>&
5098 CpS1S4cS5S5,
5099 double scale)
5100{
5101 auto& lib = Loop_library::get();
5102
5103 looplibrary::Acoeff_t A_coeffs;
5104 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
5105
5106 const auto a0tmp1 = A_coeffs.at(0);
5107
5108 Decay_amplitude_SSV result;
5109
5110 result.m_decay = mext1;
5111 result.m_scalar = mext2;
5112 result.m_vector = mext3;
5113
5114 result.form_factor = oneOver16PiSqr*(a0tmp1*CpS1S4cS5S5*CpS2cS4V3*Den(Sqr(
5115 mext1),Sqr(mIS4)));
5116
5117 return result;
5118}
5119
5133Decay_amplitude_SSV calculate_diagram_SSV_t5g2n17_SV(
5134 double mext1, double mext2, double mext3,
5135 double mIS4, double mLV5,
5136 const std::complex<double>& CpS2cS4V3, const std::complex<double>&
5137 CpS1S4cV5V5,
5138 double scale, double finite)
5139{
5140 auto& lib = Loop_library::get();
5141
5142 looplibrary::Acoeff_t A_coeffs;
5143 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
5144
5145 const auto a0tmp1 = A_coeffs.at(0);
5146
5147 Decay_amplitude_SSV result;
5148
5149 result.m_decay = mext1;
5150 result.m_scalar = mext2;
5151 result.m_vector = mext3;
5152
5153 result.form_factor = oneOver16PiSqr*(-2*CpS1S4cV5V5*CpS2cS4V3*Den(Sqr(mext1)
5154 ,Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5)));
5155
5156 return result;
5157}
5158
5173Decay_amplitude_SSV calculate_diagram_SSV_t6g1n18_SV(
5174 double mext1, double mext2, double mext3,
5175 double mLS4, double mLV5,
5176 const std::complex<double>& CpS2cS4cV5, const std::complex<double>&
5177 CpS1S4V3V5,
5178 double scale)
5179{
5180 auto& lib = Loop_library::get();
5181
5182 looplibrary::Bcoeff_t B_coeffs;
5183 lib.B(B_coeffs, mext2*mext2, mLS4*mLS4, mLV5*mLV5, scale*scale);
5184
5185 const auto b0tmp1 = B_coeffs.at(0);
5186 const auto b1tmp2 = B_coeffs.at(1);
5187
5188 Decay_amplitude_SSV result;
5189
5190 result.m_decay = mext1;
5191 result.m_scalar = mext2;
5192 result.m_vector = mext3;
5193
5194 result.form_factor = oneOver16PiSqr*((-b0tmp1 + b1tmp2)*CpS1S4V3V5*
5195 CpS2cS4cV5);
5196
5197 return result;
5198}
5199
5221Decay_amplitude_SSV calculate_diagram_SSV_t8g6n26_VFF(
5222 double mext1, double mext2, double mext3,
5223 double mIV4, double mLF5, double mLF6,
5224 const std::complex<double>& CpF5F6V4PL, const std::complex<double>&
5225 CpF5F6V4PR, const std::complex<double>& CpcF6cF5V3PL, const std::complex<
5226 double>& CpcF6cF5V3PR, const std::complex<double>& CpS1S2cV4,
5227 double scale)
5228{
5229 auto& lib = Loop_library::get();
5230
5231 looplibrary::Acoeff_t A_coeffs;
5232 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
5233
5234 looplibrary::Bcoeff_t B_coeffs;
5235 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLF6*mLF6, scale*scale);
5236
5237 const auto a0tmp1 = A_coeffs.at(0);
5238 const auto b0tmp2 = B_coeffs.at(0);
5239 const auto b00tmp3 = B_coeffs.at(2);
5240 const auto b1tmp4 = B_coeffs.at(1);
5241
5242 Decay_amplitude_SSV result;
5243
5244 result.m_decay = mext1;
5245 result.m_scalar = mext2;
5246 result.m_vector = mext3;
5247
5248 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,2)*CpS1S2cV4*Den
5249 (Sqr(mext3),Sqr(mIV4))*(a0tmp1*(CpcF6cF5V3PL*CpF5F6V4PL + CpcF6cF5V3PR*
5250 CpF5F6V4PR) - 2*b00tmp3*(CpcF6cF5V3PL*CpF5F6V4PL + CpcF6cF5V3PR*
5251 CpF5F6V4PR) - b0tmp2*CpcF6cF5V3PR*CpF5F6V4PL*mLF5*mLF6 - b0tmp2*
5252 CpcF6cF5V3PL*CpF5F6V4PR*mLF5*mLF6 + b1tmp4*CpcF6cF5V3PL*CpF5F6V4PL*Sqr(
5253 mext3) + b1tmp4*CpcF6cF5V3PR*CpF5F6V4PR*Sqr(mext3) + b0tmp2*CpcF6cF5V3PL*
5254 CpF5F6V4PL*Sqr(mLF5) + b0tmp2*CpcF6cF5V3PR*CpF5F6V4PR*Sqr(mLF5)));
5255
5256 return result;
5257}
5258
5275Decay_amplitude_SSV calculate_diagram_SSV_t8g7n27_VSS(
5276 double mext1, double mext2, double mext3,
5277 double mIV4, double mLS5, double mLS6,
5278 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
5279 CpcS5cS6V3, const std::complex<double>& CpS5S6V4,
5280 double scale)
5281{
5282 auto& lib = Loop_library::get();
5283
5284 looplibrary::Bcoeff_t B_coeffs;
5285 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLS6*mLS6, scale*scale);
5286
5287 const auto b00tmp1 = B_coeffs.at(2);
5288
5289 Decay_amplitude_SSV result;
5290
5291 result.m_decay = mext1;
5292 result.m_scalar = mext2;
5293 result.m_vector = mext3;
5294
5295 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-4)*b00tmp1*
5296 CpcS5cS6V3*CpS1S2cV4*CpS5S6V4*Den(Sqr(mext3),Sqr(mIV4)));
5297
5298 return result;
5299}
5300
5316Decay_amplitude_SSV calculate_diagram_SSV_t8g9n29_VSV(
5317 double mext1, double mext2, double mext3,
5318 double mIV4, double mLS5, double mLV6,
5319 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
5320 CpcS5V3cV6, const std::complex<double>& CpS5V4V6,
5321 double scale)
5322{
5323 auto& lib = Loop_library::get();
5324
5325 looplibrary::Bcoeff_t B_coeffs;
5326 lib.B(B_coeffs, mext3*mext3, mLS5*mLS5, mLV6*mLV6, scale*scale);
5327
5328 const auto b0tmp1 = B_coeffs.at(0);
5329
5330 Decay_amplitude_SSV result;
5331
5332 result.m_decay = mext1;
5333 result.m_scalar = mext2;
5334 result.m_vector = mext3;
5335
5336 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*b0tmp1*
5337 CpcS5V3cV6*CpS1S2cV4*CpS5V4V6*Den(Sqr(mext3),Sqr(mIV4)));
5338
5339 return result;
5340}
5341
5361Decay_amplitude_SSV calculate_diagram_SSV_t8g10n30_VVV(
5362 double mext1, double mext2, double mext3,
5363 double mIV4, double mLV5, double mLV6,
5364 const std::complex<double>& CpS1S2cV4, const std::complex<double>&
5365 CpV3cV5cV6, const std::complex<double>& CpV4V5V6,
5366 double scale, double finite)
5367{
5368 auto& lib = Loop_library::get();
5369
5370 looplibrary::Acoeff_t A_coeffs;
5371 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
5372
5373 looplibrary::Bcoeff_t B_coeffs;
5374 lib.B(B_coeffs, mext3*mext3, mLV5*mLV5, mLV6*mLV6, scale*scale);
5375
5376 const auto a0tmp1 = A_coeffs.at(0);
5377 const auto b0tmp2 = B_coeffs.at(0);
5378 const auto b00tmp3 = B_coeffs.at(2);
5379 const auto b1tmp4 = B_coeffs.at(1);
5380
5381 Decay_amplitude_SSV result;
5382
5383 result.m_decay = mext1;
5384 result.m_scalar = mext2;
5385 result.m_vector = mext3;
5386
5387 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-
5388 0.3333333333333333)*CpS1S2cV4*CpV3cV5cV6*CpV4V5V6*(15*b0tmp2 + Den(Sqr(
5389 mext3),Sqr(mIV4))*(6*a0tmp1 + 30*b00tmp3 + 6*b1tmp4*Sqr(mext3) + 2*finite
5390 *Sqr(mext3) + 15*b0tmp2*Sqr(mIV4) + 6*b0tmp2*Sqr(mLV5) - 6*finite*Sqr(
5391 mLV5) - 6*finite*Sqr(mLV6))));
5392
5393 return result;
5394}
5395
5413Decay_amplitude_SSV calculate_diagram_SSV_t9g1n31_SFF(
5414 double mext1, double mext2, double mext3,
5415 double mIS4, double mLF5, double mLF6,
5416 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
5417 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S2PL, const std::complex<
5418 double>& CpcF6cF5S2PR, const std::complex<double>& CpS1cS4V3,
5419 double scale)
5420{
5421 auto& lib = Loop_library::get();
5422
5423 looplibrary::Acoeff_t A_coeffs;
5424 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
5425
5426 looplibrary::Bcoeff_t B_coeffs;
5427 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLF6*mLF6, scale*scale);
5428
5429 const auto a0tmp1 = A_coeffs.at(0);
5430 const auto b0tmp2 = B_coeffs.at(0);
5431 const auto b1tmp3 = B_coeffs.at(1);
5432
5433 Decay_amplitude_SSV result;
5434
5435 result.m_decay = mext1;
5436 result.m_scalar = mext2;
5437 result.m_vector = mext3;
5438
5439 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,2)*CpS1cS4V3*Den
5440 (Sqr(mext2),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S2PR*CpF5F6S4PL*mLF5 +
5441 CpcF6cF5S2PL*CpF5F6S4PR*mLF5 + CpcF6cF5S2PL*CpF5F6S4PL*mLF6 +
5442 CpcF6cF5S2PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S2PR*CpF5F6S4PL + CpcF6cF5S2PL*
5443 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext2))));
5444
5445 return result;
5446}
5447
5463Decay_amplitude_SSV calculate_diagram_SSV_t9g2n32_SSS(
5464 double mext1, double mext2, double mext3,
5465 double mIS4, double mLS5, double mLS6,
5466 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
5467 CpS2cS5cS6, const std::complex<double>& CpS4S5S6,
5468 double scale)
5469{
5470 auto& lib = Loop_library::get();
5471
5472 looplibrary::Bcoeff_t B_coeffs;
5473 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLS6*mLS6, scale*scale);
5474
5475 const auto b0tmp1 = B_coeffs.at(0);
5476
5477 Decay_amplitude_SSV result;
5478
5479 result.m_decay = mext1;
5480 result.m_scalar = mext2;
5481 result.m_vector = mext3;
5482
5483 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*b0tmp1*
5484 CpS1cS4V3*CpS2cS5cS6*CpS4S5S6*Den(Sqr(mext2),Sqr(mIS4)));
5485
5486 return result;
5487}
5488
5504Decay_amplitude_SSV calculate_diagram_SSV_t9g3n33_SUU(
5505 double mext1, double mext2, double mext3,
5506 double mIS4, double mLU5, double mLU6,
5507 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
5508 CpS2cU6cU5, const std::complex<double>& CpS4U5U6,
5509 double scale)
5510{
5511 auto& lib = Loop_library::get();
5512
5513 looplibrary::Bcoeff_t B_coeffs;
5514 lib.B(B_coeffs, mext2*mext2, mLU5*mLU5, mLU6*mLU6, scale*scale);
5515
5516 const auto b0tmp1 = B_coeffs.at(0);
5517
5518 Decay_amplitude_SSV result;
5519
5520 result.m_decay = mext1;
5521 result.m_scalar = mext2;
5522 result.m_vector = mext3;
5523
5524 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*b0tmp1*
5525 CpS1cS4V3*CpS2cU6cU5*CpS4U5U6*Den(Sqr(mext2),Sqr(mIS4)));
5526
5527 return result;
5528}
5529
5546Decay_amplitude_SSV calculate_diagram_SSV_t9g4n34_SSV(
5547 double mext1, double mext2, double mext3,
5548 double mIS4, double mLS5, double mLV6,
5549 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
5550 CpS2cS5cV6, const std::complex<double>& CpS4S5V6,
5551 double scale)
5552{
5553 auto& lib = Loop_library::get();
5554
5555 looplibrary::Acoeff_t A_coeffs;
5556 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
5557
5558 looplibrary::Bcoeff_t B_coeffs;
5559 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLV6*mLV6, scale*scale);
5560
5561 const auto a0tmp1 = A_coeffs.at(0);
5562 const auto b0tmp2 = B_coeffs.at(0);
5563 const auto b1tmp3 = B_coeffs.at(1);
5564
5565 Decay_amplitude_SSV result;
5566
5567 result.m_decay = mext1;
5568 result.m_scalar = mext2;
5569 result.m_vector = mext3;
5570
5571 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*CpS1cS4V3*
5572 CpS2cS5cV6*CpS4S5V6*(b0tmp2 + Den(Sqr(mext2),Sqr(mIS4))*(a0tmp1 - 2*
5573 b1tmp3*Sqr(mext2) + b0tmp2*(Sqr(mIS4) + Sqr(mLS5)))));
5574
5575 return result;
5576}
5577
5593Decay_amplitude_SSV calculate_diagram_SSV_t9g5n35_SVV(
5594 double mext1, double mext2, double mext3,
5595 double mIS4, double mLV5, double mLV6,
5596 const std::complex<double>& CpS1cS4V3, const std::complex<double>&
5597 CpS2cV5cV6, const std::complex<double>& CpS4V5V6,
5598 double scale, double finite)
5599{
5600 auto& lib = Loop_library::get();
5601
5602 looplibrary::Bcoeff_t B_coeffs;
5603 lib.B(B_coeffs, mext2*mext2, mLV5*mLV5, mLV6*mLV6, scale*scale);
5604
5605 const auto b0tmp1 = B_coeffs.at(0);
5606
5607 Decay_amplitude_SSV result;
5608
5609 result.m_decay = mext1;
5610 result.m_scalar = mext2;
5611 result.m_vector = mext3;
5612
5613 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,2)*CpS1cS4V3*
5614 CpS2cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext2),Sqr(mIS4)));
5615
5616 return result;
5617}
5618
5638Decay_amplitude_SSV calculate_diagram_SSV_t9g6n36_VFF(
5639 double mext1, double mext2, double mext3,
5640 double mIV4, double mLF5, double mLF6,
5641 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
5642 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S2PL, const std::complex<
5643 double>& CpcF6cF5S2PR, const std::complex<double>& CpS1V3cV4,
5644 double scale)
5645{
5646 auto& lib = Loop_library::get();
5647
5648 looplibrary::Bcoeff_t B_coeffs;
5649 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLF6*mLF6, scale*scale);
5650
5651 const auto b0tmp1 = B_coeffs.at(0);
5652 const auto b1tmp2 = B_coeffs.at(1);
5653
5654 Decay_amplitude_SSV result;
5655
5656 result.m_decay = mext1;
5657 result.m_scalar = mext2;
5658 result.m_vector = mext3;
5659
5660 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*CpS1V3cV4*(
5661 b0tmp1*(CpcF6cF5S2PR*CpF5F6V4PL + CpcF6cF5S2PL*CpF5F6V4PR)*mLF5 + b1tmp2*
5662 (CpcF6cF5S2PR*CpF5F6V4PL*mLF5 + CpcF6cF5S2PL*CpF5F6V4PR*mLF5 +
5663 CpcF6cF5S2PL*CpF5F6V4PL*mLF6 + CpcF6cF5S2PR*CpF5F6V4PR*mLF6))*Den(Sqr(
5664 mext2),Sqr(mIV4)));
5665
5666 return result;
5667}
5668
5684Decay_amplitude_SSV calculate_diagram_SSV_t9g7n37_VSS(
5685 double mext1, double mext2, double mext3,
5686 double mIV4, double mLS5, double mLS6,
5687 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
5688 CpS2cS5cS6, const std::complex<double>& CpS5S6V4,
5689 double scale)
5690{
5691 auto& lib = Loop_library::get();
5692
5693 looplibrary::Bcoeff_t B_coeffs;
5694 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLS6*mLS6, scale*scale);
5695
5696 const auto b0tmp1 = B_coeffs.at(0);
5697 const auto b1tmp2 = B_coeffs.at(1);
5698
5699 Decay_amplitude_SSV result;
5700
5701 result.m_decay = mext1;
5702 result.m_scalar = mext2;
5703 result.m_vector = mext3;
5704
5705 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*(b0tmp1 + 2
5706 *b1tmp2)*CpS1V3cV4*CpS2cS5cS6*CpS5S6V4*Den(Sqr(mext2),Sqr(mIV4)));
5707
5708 return result;
5709}
5710
5726Decay_amplitude_SSV calculate_diagram_SSV_t9g8n38_VUU(
5727 double mext1, double mext2, double mext3,
5728 double mIV4, double mLU5, double mLU6,
5729 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
5730 CpS2cU6cU5, const std::complex<double>& CpU5U6V4,
5731 double scale)
5732{
5733 auto& lib = Loop_library::get();
5734
5735 looplibrary::Bcoeff_t B_coeffs;
5736 lib.B(B_coeffs, mext2*mext2, mLU5*mLU5, mLU6*mLU6, scale*scale);
5737
5738 const auto b1tmp1 = B_coeffs.at(1);
5739
5740 Decay_amplitude_SSV result;
5741
5742 result.m_decay = mext1;
5743 result.m_scalar = mext2;
5744 result.m_vector = mext3;
5745
5746 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*b1tmp1*
5747 CpS1V3cV4*CpS2cU6cU5*CpU5U6V4*Den(Sqr(mext2),Sqr(mIV4)));
5748
5749 return result;
5750}
5751
5768Decay_amplitude_SSV calculate_diagram_SSV_t9g9n39_VSV(
5769 double mext1, double mext2, double mext3,
5770 double mIV4, double mLS5, double mLV6,
5771 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
5772 CpS2cS5cV6, const std::complex<double>& CpS5V4V6,
5773 double scale)
5774{
5775 auto& lib = Loop_library::get();
5776
5777 looplibrary::Bcoeff_t B_coeffs;
5778 lib.B(B_coeffs, mext2*mext2, mLS5*mLS5, mLV6*mLV6, scale*scale);
5779
5780 const auto b0tmp1 = B_coeffs.at(0);
5781 const auto b1tmp2 = B_coeffs.at(1);
5782
5783 Decay_amplitude_SSV result;
5784
5785 result.m_decay = mext1;
5786 result.m_scalar = mext2;
5787 result.m_vector = mext3;
5788
5789 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1 -
5790 b1tmp2)*CpS1V3cV4*CpS2cS5cV6*CpS5V4V6*Den(Sqr(mext2),Sqr(mIV4)));
5791
5792 return result;
5793}
5794
5812Decay_amplitude_SSV calculate_diagram_SSV_t9g10n40_VVV(
5813 double mext1, double mext2, double mext3,
5814 double mIV4, double mLV5, double mLV6,
5815 const std::complex<double>& CpS1V3cV4, const std::complex<double>&
5816 CpS2cV5cV6, const std::complex<double>& CpV4V5V6,
5817 double scale)
5818{
5819 auto& lib = Loop_library::get();
5820
5821 looplibrary::Bcoeff_t B_coeffs;
5822 lib.B(B_coeffs, mext2*mext2, mLV5*mLV5, mLV6*mLV6, scale*scale);
5823
5824 const auto b0tmp1 = B_coeffs.at(0);
5825 const auto b1tmp2 = B_coeffs.at(1);
5826
5827 Decay_amplitude_SSV result;
5828
5829 result.m_decay = mext1;
5830 result.m_scalar = mext2;
5831 result.m_vector = mext3;
5832
5833 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1.5)*(b0tmp1 +
5834 2*b1tmp2)*CpS1V3cV4*CpS2cV5cV6*CpV4V5V6*Den(Sqr(mext2),Sqr(mIV4)));
5835
5836 return result;
5837}
5838
5856Decay_amplitude_SSV calculate_diagram_SSV_t10g1n41_SFF(
5857 double mext1, double mext2, double mext3,
5858 double mIS4, double mLF5, double mLF6,
5859 const std::complex<double>& CpF5F6S4PL, const std::complex<double>&
5860 CpF5F6S4PR, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
5861 double>& CpcF6cF5S1PR, const std::complex<double>& CpS2cS4V3,
5862 double scale)
5863{
5864 auto& lib = Loop_library::get();
5865
5866 looplibrary::Acoeff_t A_coeffs;
5867 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
5868
5869 looplibrary::Bcoeff_t B_coeffs;
5870 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
5871
5872 const auto a0tmp1 = A_coeffs.at(0);
5873 const auto b0tmp2 = B_coeffs.at(0);
5874 const auto b1tmp3 = B_coeffs.at(1);
5875
5876 Decay_amplitude_SSV result;
5877
5878 result.m_decay = mext1;
5879 result.m_scalar = mext2;
5880 result.m_vector = mext3;
5881
5882 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*CpS2cS4V3*
5883 Den(Sqr(mext1),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S1PR*CpF5F6S4PL*mLF5 +
5884 CpcF6cF5S1PL*CpF5F6S4PR*mLF5 + CpcF6cF5S1PL*CpF5F6S4PL*mLF6 +
5885 CpcF6cF5S1PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S1PR*CpF5F6S4PL + CpcF6cF5S1PL*
5886 CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext1))));
5887
5888 return result;
5889}
5890
5906Decay_amplitude_SSV calculate_diagram_SSV_t10g2n42_SSS(
5907 double mext1, double mext2, double mext3,
5908 double mIS4, double mLS5, double mLS6,
5909 const std::complex<double>& CpS1cS5cS6, const std::complex<double>&
5910 CpS2cS4V3, const std::complex<double>& CpS4S5S6,
5911 double scale)
5912{
5913 auto& lib = Loop_library::get();
5914
5915 looplibrary::Bcoeff_t B_coeffs;
5916 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
5917
5918 const auto b0tmp1 = B_coeffs.at(0);
5919
5920 Decay_amplitude_SSV result;
5921
5922 result.m_decay = mext1;
5923 result.m_scalar = mext2;
5924 result.m_vector = mext3;
5925
5926 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1)*b0tmp1*
5927 CpS1cS5cS6*CpS2cS4V3*CpS4S5S6*Den(Sqr(mext1),Sqr(mIS4)));
5928
5929 return result;
5930}
5931
5947Decay_amplitude_SSV calculate_diagram_SSV_t10g3n43_SUU(
5948 double mext1, double mext2, double mext3,
5949 double mIS4, double mLU5, double mLU6,
5950 const std::complex<double>& CpS1cU6cU5, const std::complex<double>&
5951 CpS2cS4V3, const std::complex<double>& CpS4U5U6,
5952 double scale)
5953{
5954 auto& lib = Loop_library::get();
5955
5956 looplibrary::Bcoeff_t B_coeffs;
5957 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
5958
5959 const auto b0tmp1 = B_coeffs.at(0);
5960
5961 Decay_amplitude_SSV result;
5962
5963 result.m_decay = mext1;
5964 result.m_scalar = mext2;
5965 result.m_vector = mext3;
5966
5967 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*b0tmp1*
5968 CpS1cU6cU5*CpS2cS4V3*CpS4U5U6*Den(Sqr(mext1),Sqr(mIS4)));
5969
5970 return result;
5971}
5972
5989Decay_amplitude_SSV calculate_diagram_SSV_t10g4n44_SSV(
5990 double mext1, double mext2, double mext3,
5991 double mIS4, double mLS5, double mLV6,
5992 const std::complex<double>& CpS1cS5cV6, const std::complex<double>&
5993 CpS2cS4V3, const std::complex<double>& CpS4S5V6,
5994 double scale)
5995{
5996 auto& lib = Loop_library::get();
5997
5998 looplibrary::Acoeff_t A_coeffs;
5999 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
6000
6001 looplibrary::Bcoeff_t B_coeffs;
6002 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
6003
6004 const auto a0tmp1 = A_coeffs.at(0);
6005 const auto b0tmp2 = B_coeffs.at(0);
6006 const auto b1tmp3 = B_coeffs.at(1);
6007
6008 Decay_amplitude_SSV result;
6009
6010 result.m_decay = mext1;
6011 result.m_scalar = mext2;
6012 result.m_vector = mext3;
6013
6014 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,2)*CpS1cS5cV6*
6015 CpS2cS4V3*CpS4S5V6*Den(Sqr(mext1),Sqr(mIS4))*(a0tmp1 - 2*b1tmp3*Sqr(mext1
6016 ) + b0tmp2*(Sqr(mext1) + Sqr(mLS5))));
6017
6018 return result;
6019}
6020
6036Decay_amplitude_SSV calculate_diagram_SSV_t10g5n45_SVV(
6037 double mext1, double mext2, double mext3,
6038 double mIS4, double mLV5, double mLV6,
6039 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
6040 CpS2cS4V3, const std::complex<double>& CpS4V5V6,
6041 double scale, double finite)
6042{
6043 auto& lib = Loop_library::get();
6044
6045 looplibrary::Bcoeff_t B_coeffs;
6046 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
6047
6048 const auto b0tmp1 = B_coeffs.at(0);
6049
6050 Decay_amplitude_SSV result;
6051
6052 result.m_decay = mext1;
6053 result.m_scalar = mext2;
6054 result.m_vector = mext3;
6055
6056 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-2)*CpS1cV5cV6*
6057 CpS2cS4V3*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext1),Sqr(mIS4)));
6058
6059 return result;
6060}
6061
6081Decay_amplitude_SSV calculate_diagram_SSV_t10g6n46_VFF(
6082 double mext1, double mext2, double mext3,
6083 double mIV4, double mLF5, double mLF6,
6084 const std::complex<double>& CpF5F6V4PR, const std::complex<double>&
6085 CpF5F6V4PL, const std::complex<double>& CpcF6cF5S1PL, const std::complex<
6086 double>& CpcF6cF5S1PR, const std::complex<double>& CpS2V3cV4,
6087 double scale)
6088{
6089 auto& lib = Loop_library::get();
6090
6091 looplibrary::Bcoeff_t B_coeffs;
6092 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
6093
6094 const auto b0tmp1 = B_coeffs.at(0);
6095 const auto b1tmp2 = B_coeffs.at(1);
6096
6097 Decay_amplitude_SSV result;
6098
6099 result.m_decay = mext1;
6100 result.m_scalar = mext2;
6101 result.m_vector = mext3;
6102
6103 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*CpS2V3cV4*(
6104 b0tmp1*(CpcF6cF5S1PR*CpF5F6V4PL + CpcF6cF5S1PL*CpF5F6V4PR)*mLF5 + b1tmp2*
6105 (CpcF6cF5S1PR*CpF5F6V4PL*mLF5 + CpcF6cF5S1PL*CpF5F6V4PR*mLF5 +
6106 CpcF6cF5S1PL*CpF5F6V4PL*mLF6 + CpcF6cF5S1PR*CpF5F6V4PR*mLF6))*Den(Sqr(
6107 mext1),Sqr(mIV4)));
6108
6109 return result;
6110}
6111
6127Decay_amplitude_SSV calculate_diagram_SSV_t10g7n47_VSS(
6128 double mext1, double mext2, double mext3,
6129 double mIV4, double mLS5, double mLS6,
6130 const std::complex<double>& CpS1cS5cS6, const std::complex<double>&
6131 CpS2V3cV4, const std::complex<double>& CpS5S6V4,
6132 double scale)
6133{
6134 auto& lib = Loop_library::get();
6135
6136 looplibrary::Bcoeff_t B_coeffs;
6137 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
6138
6139 const auto b0tmp1 = B_coeffs.at(0);
6140 const auto b1tmp2 = B_coeffs.at(1);
6141
6142 Decay_amplitude_SSV result;
6143
6144 result.m_decay = mext1;
6145 result.m_scalar = mext2;
6146 result.m_vector = mext3;
6147
6148 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-0.5)*(b0tmp1 +
6149 2*b1tmp2)*CpS1cS5cS6*CpS2V3cV4*CpS5S6V4*Den(Sqr(mext1),Sqr(mIV4)));
6150
6151 return result;
6152}
6153
6169Decay_amplitude_SSV calculate_diagram_SSV_t10g8n48_VUU(
6170 double mext1, double mext2, double mext3,
6171 double mIV4, double mLU5, double mLU6,
6172 const std::complex<double>& CpS1cU6cU5, const std::complex<double>&
6173 CpS2V3cV4, const std::complex<double>& CpU5U6V4,
6174 double scale)
6175{
6176 auto& lib = Loop_library::get();
6177
6178 looplibrary::Bcoeff_t B_coeffs;
6179 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
6180
6181 const auto b1tmp1 = B_coeffs.at(1);
6182
6183 Decay_amplitude_SSV result;
6184
6185 result.m_decay = mext1;
6186 result.m_scalar = mext2;
6187 result.m_vector = mext3;
6188
6189 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,0.5)*b1tmp1*
6190 CpS1cU6cU5*CpS2V3cV4*CpU5U6V4*Den(Sqr(mext1),Sqr(mIV4)));
6191
6192 return result;
6193}
6194
6211Decay_amplitude_SSV calculate_diagram_SSV_t10g9n49_VSV(
6212 double mext1, double mext2, double mext3,
6213 double mIV4, double mLS5, double mLV6,
6214 const std::complex<double>& CpS1cS5cV6, const std::complex<double>&
6215 CpS2V3cV4, const std::complex<double>& CpS5V4V6,
6216 double scale)
6217{
6218 auto& lib = Loop_library::get();
6219
6220 looplibrary::Bcoeff_t B_coeffs;
6221 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
6222
6223 const auto b0tmp1 = B_coeffs.at(0);
6224 const auto b1tmp2 = B_coeffs.at(1);
6225
6226 Decay_amplitude_SSV result;
6227
6228 result.m_decay = mext1;
6229 result.m_scalar = mext2;
6230 result.m_vector = mext3;
6231
6232 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,-1)*(b0tmp1 -
6233 b1tmp2)*CpS1cS5cV6*CpS2V3cV4*CpS5V4V6*Den(Sqr(mext1),Sqr(mIV4)));
6234
6235 return result;
6236}
6237
6255Decay_amplitude_SSV calculate_diagram_SSV_t10g10n50_VVV(
6256 double mext1, double mext2, double mext3,
6257 double mIV4, double mLV5, double mLV6,
6258 const std::complex<double>& CpS1cV5cV6, const std::complex<double>&
6259 CpS2V3cV4, const std::complex<double>& CpV4V5V6,
6260 double scale)
6261{
6262 auto& lib = Loop_library::get();
6263
6264 looplibrary::Bcoeff_t B_coeffs;
6265 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
6266
6267 const auto b0tmp1 = B_coeffs.at(0);
6268 const auto b1tmp2 = B_coeffs.at(1);
6269
6270 Decay_amplitude_SSV result;
6271
6272 result.m_decay = mext1;
6273 result.m_scalar = mext2;
6274 result.m_vector = mext3;
6275
6276 result.form_factor = oneOver16PiSqr*(std::complex<double>(0,1.5)*(b0tmp1 + 2
6277 *b1tmp2)*CpS1cV5cV6*CpS2V3cV4*CpV4V5V6*Den(Sqr(mext1),Sqr(mIV4)));
6278
6279 return result;
6280}
6281
6300Decay_amplitude_SFF calculate_diagram_SFF_t1g1n1_FFS(
6301 double mext1, double mext2, double mext3,
6302 double mLF4, double mLF5, double mLS6,
6303 const std::complex<double>& CpF2F4cS6PL, const std::complex<double>&
6304 CpF2F4cS6PR, const std::complex<double>& CpcF4cF5S1PL, const std::complex
6305 <double>& CpcF4cF5S1PR, const std::complex<double>& CpF5F3S6PL, const std
6306 ::complex<double>& CpF5F3S6PR,
6307 double scale)
6308{
6309 auto& lib = Loop_library::get();
6310
6311 looplibrary::Bcoeff_t B_coeffs;
6312 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLS6*mLS6, scale*scale);
6313
6314 looplibrary::Ccoeff_t C_coeffs;
6315 lib.C(C_coeffs, mext1*mext1, mext3*mext3, mext2*mext2, mLF4*mLF4, mLF5*mLF5,
6316 mLS6*mLS6, scale*scale);
6317
6318 const auto b0tmp1 = B_coeffs.at(0);
6319 const auto c0tmp2 = C_coeffs.at(0);
6320 const auto c1tmp3 = C_coeffs.at(1);
6321 const auto c2tmp4 = C_coeffs.at(2);
6322
6323 Decay_amplitude_SFF result;
6324
6325 result.m_decay = mext1;
6326 result.m_fermion_1 = mext2;
6327 result.m_fermion_2 = mext3;
6328
6329 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1*
6330 CpcF4cF5S1PR*CpF2F4cS6PL*CpF5F3S6PL - c2tmp4*CpcF4cF5S1PL*CpF2F4cS6PR*
6331 CpF5F3S6PR*mext2*mext3 - c2tmp4*CpcF4cF5S1PR*CpF2F4cS6PR*CpF5F3S6PL*mext2
6332 *mLF4 - c2tmp4*CpcF4cF5S1PL*CpF2F4cS6PR*CpF5F3S6PL*mext2*mLF5 - c1tmp3*
6333 CpF2F4cS6PR*CpF5F3S6PL*mext2*(CpcF4cF5S1PR*mLF4 + CpcF4cF5S1PL*mLF5) +
6334 c0tmp2*mLF4*(-(CpcF4cF5S1PR*CpF2F4cS6PR*CpF5F3S6PL*mext2) + CpcF4cF5S1PL*
6335 CpF2F4cS6PL*CpF5F3S6PR*mext3 + CpcF4cF5S1PR*CpF2F4cS6PL*CpF5F3S6PL*mLF4 +
6336 CpcF4cF5S1PL*CpF2F4cS6PL*CpF5F3S6PL*mLF5) + c1tmp3*CpF2F4cS6PL*(
6337 CpcF4cF5S1PL*CpF5F3S6PR*mext3*mLF4 + CpcF4cF5S1PR*CpF5F3S6PR*mext3*mLF5 +
6338 CpcF4cF5S1PR*CpF5F3S6PL*Sqr(mext1)) + c2tmp4*CpcF4cF5S1PR*CpF2F4cS6PL*
6339 CpF5F3S6PL*Sqr(mext2)));
6340 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1
6341 *CpcF4cF5S1PL*CpF2F4cS6PR*CpF5F3S6PR - c0tmp2*CpcF4cF5S1PL*CpF2F4cS6PL*
6342 CpF5F3S6PR*mext2*mLF4 + c0tmp2*CpcF4cF5S1PR*CpF2F4cS6PR*CpF5F3S6PL*mext3*
6343 mLF4 + c0tmp2*CpcF4cF5S1PR*CpF2F4cS6PR*CpF5F3S6PR*mLF4*mLF5 + c1tmp3*
6344 CpF2F4cS6PR*CpF5F3S6PL*mext3*(CpcF4cF5S1PR*mLF4 + CpcF4cF5S1PL*mLF5) -
6345 c2tmp4*CpF2F4cS6PL*mext2*(CpcF4cF5S1PR*CpF5F3S6PL*mext3 + CpcF4cF5S1PL*
6346 CpF5F3S6PR*mLF4 + CpcF4cF5S1PR*CpF5F3S6PR*mLF5) + c1tmp3*CpF5F3S6PR*(-(
6347 CpF2F4cS6PL*mext2*(CpcF4cF5S1PL*mLF4 + CpcF4cF5S1PR*mLF5)) + CpcF4cF5S1PL
6348 *CpF2F4cS6PR*Sqr(mext1)) + c2tmp4*CpcF4cF5S1PL*CpF2F4cS6PR*CpF5F3S6PR*Sqr
6349 (mext2) + c0tmp2*CpcF4cF5S1PL*CpF2F4cS6PR*CpF5F3S6PR*Sqr(mLF4)));
6350
6351 return result;
6352}
6353
6371Decay_amplitude_SFF calculate_diagram_SFF_t1g2n2_SSF(
6372 double mext1, double mext2, double mext3,
6373 double mLS4, double mLS5, double mLF6,
6374 const std::complex<double>& CpF2cF6S4PL, const std::complex<double>&
6375 CpF2cF6S4PR, const std::complex<double>& CpF6F3S5PL, const std::complex<
6376 double>& CpF6F3S5PR, const std::complex<double>& CpS1cS4cS5,
6377 double scale)
6378{
6379 auto& lib = Loop_library::get();
6380
6381 looplibrary::Ccoeff_t C_coeffs;
6382 lib.C(C_coeffs, mext2*mext2, mext1*mext1, mext3*mext3, mLF6*mLF6, mLS4*mLS4,
6383 mLS5*mLS5, scale*scale);
6384
6385 const auto c0tmp1 = C_coeffs.at(0);
6386 const auto c1tmp2 = C_coeffs.at(1);
6387 const auto c2tmp3 = C_coeffs.at(2);
6388
6389 Decay_amplitude_SFF result;
6390
6391 result.m_decay = mext1;
6392 result.m_fermion_1 = mext2;
6393 result.m_fermion_2 = mext3;
6394
6395 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
6396 CpS1cS4cS5*(c1tmp2*CpF2cF6S4PR*CpF6F3S5PL*mext2 + c2tmp3*CpF2cF6S4PL*
6397 CpF6F3S5PR*mext3 - c0tmp1*CpF2cF6S4PL*CpF6F3S5PL*mLF6));
6398 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
6399 CpS1cS4cS5*(c1tmp2*CpF2cF6S4PL*CpF6F3S5PR*mext2 + c2tmp3*CpF2cF6S4PR*
6400 CpF6F3S5PL*mext3 - c0tmp1*CpF2cF6S4PR*CpF6F3S5PR*mLF6));
6401
6402 return result;
6403}
6404
6427Decay_amplitude_SFF calculate_diagram_SFF_t1g3n3_FFV(
6428 double mext1, double mext2, double mext3,
6429 double mLF4, double mLF5, double mLV6,
6430 const std::complex<double>& CpF2F4cV6PR, const std::complex<double>&
6431 CpF2F4cV6PL, const std::complex<double>& CpcF4cF5S1PL, const std::complex
6432 <double>& CpcF4cF5S1PR, const std::complex<double>& CpF5F3V6PL, const std
6433 ::complex<double>& CpF5F3V6PR,
6434 double scale, double finite)
6435{
6436 auto& lib = Loop_library::get();
6437
6438 looplibrary::Bcoeff_t B_coeffs;
6439 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLV6*mLV6, scale*scale);
6440
6441 looplibrary::Ccoeff_t C_coeffs;
6442 lib.C(C_coeffs, mext1*mext1, mext3*mext3, mext2*mext2, mLF4*mLF4, mLF5*mLF5,
6443 mLV6*mLV6, scale*scale);
6444
6445 const auto b0tmp1 = B_coeffs.at(0);
6446 const auto c0tmp2 = C_coeffs.at(0);
6447 const auto c1tmp3 = C_coeffs.at(1);
6448 const auto c2tmp4 = C_coeffs.at(2);
6449
6450 Decay_amplitude_SFF result;
6451
6452 result.m_decay = mext1;
6453 result.m_fermion_1 = mext2;
6454 result.m_fermion_2 = mext3;
6455
6456 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-2)*(2*
6457 b0tmp1*CpcF4cF5S1PL*CpF2F4cV6PR*CpF5F3V6PL + CpcF4cF5S1PR*(-(c1tmp3*
6458 CpF2F4cV6PR*CpF5F3V6PR*mext3*mLF4) + c1tmp3*CpF2F4cV6PL*CpF5F3V6PL*mext2*
6459 mLF5 + c2tmp4*CpF2F4cV6PL*CpF5F3V6PL*mext2*mLF5 + c0tmp2*CpF2F4cV6PR*mLF4
6460 *(-(CpF5F3V6PR*mext3) + 2*CpF5F3V6PL*mLF5)) + CpcF4cF5S1PL*((c0tmp2 +
6461 c1tmp3 + c2tmp4)*CpF2F4cV6PL*CpF5F3V6PL*mext2*mLF4 - c1tmp3*CpF2F4cV6PR*
6462 CpF5F3V6PR*mext3*mLF5 + CpF2F4cV6PR*CpF5F3V6PL*(-finite + 2*c1tmp3*Sqr(
6463 mext1) + c2tmp4*Sqr(mext1) + c2tmp4*Sqr(mext2) - c2tmp4*Sqr(mext3) + 2*
6464 c0tmp2*Sqr(mLF4)))));
6465 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,2)*(-2*
6466 b0tmp1*CpcF4cF5S1PR*CpF2F4cV6PL*CpF5F3V6PR + CpcF4cF5S1PL*(c1tmp3*
6467 CpF2F4cV6PL*CpF5F3V6PL*mext3*mLF4 - c1tmp3*CpF2F4cV6PR*CpF5F3V6PR*mext2*
6468 mLF5 - c2tmp4*CpF2F4cV6PR*CpF5F3V6PR*mext2*mLF5 + c0tmp2*CpF2F4cV6PL*mLF4
6469 *(CpF5F3V6PL*mext3 - 2*CpF5F3V6PR*mLF5)) + CpcF4cF5S1PR*(-((c0tmp2 +
6470 c1tmp3 + c2tmp4)*CpF2F4cV6PR*CpF5F3V6PR*mext2*mLF4) + c1tmp3*CpF2F4cV6PL*
6471 CpF5F3V6PL*mext3*mLF5 + CpF2F4cV6PL*CpF5F3V6PR*(finite - 2*c1tmp3*Sqr(
6472 mext1) - c2tmp4*Sqr(mext1) - c2tmp4*Sqr(mext2) + c2tmp4*Sqr(mext3) - 2*
6473 c0tmp2*Sqr(mLF4)))));
6474
6475 return result;
6476}
6477
6498Decay_amplitude_SFF calculate_diagram_SFF_t1g4n4_SVF(
6499 double mext1, double mext2, double mext3,
6500 double mLS4, double mLV5, double mLF6,
6501 const std::complex<double>& CpF2cF6S4PL, const std::complex<double>&
6502 CpF2cF6S4PR, const std::complex<double>& CpF6F3V5PL, const std::complex<
6503 double>& CpF6F3V5PR, const std::complex<double>& CpS1cS4cV5,
6504 double scale)
6505{
6506 auto& lib = Loop_library::get();
6507
6508 looplibrary::Bcoeff_t B_coeffs;
6509 lib.B(B_coeffs, mext3*mext3, mLF6*mLF6, mLV5*mLV5, scale*scale);
6510
6511 looplibrary::Ccoeff_t C_coeffs;
6512 lib.C(C_coeffs, mext2*mext2, mext1*mext1, mext3*mext3, mLF6*mLF6, mLS4*mLS4,
6513 mLV5*mLV5, scale*scale);
6514
6515 const auto b0tmp1 = B_coeffs.at(0);
6516 const auto c0tmp2 = C_coeffs.at(0);
6517 const auto c1tmp3 = C_coeffs.at(1);
6518 const auto c2tmp4 = C_coeffs.at(2);
6519
6520 Decay_amplitude_SFF result;
6521
6522 result.m_decay = mext1;
6523 result.m_fermion_1 = mext2;
6524 result.m_fermion_2 = mext3;
6525
6526 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*
6527 CpS1cS4cV5*(b0tmp1*CpF2cF6S4PL*CpF6F3V5PL - c1tmp3*CpF2cF6S4PR*CpF6F3V5PR
6528 *mext2*mext3 - 2*c0tmp2*CpF2cF6S4PR*CpF6F3V5PL*mext2*mLF6 - c1tmp3*
6529 CpF2cF6S4PR*CpF6F3V5PL*mext2*mLF6 + c0tmp2*CpF2cF6S4PL*CpF6F3V5PR*mext3*
6530 mLF6 - c2tmp4*(CpF6F3V5PR*mext3*(2*CpF2cF6S4PR*mext2 + CpF2cF6S4PL*mLF6)
6531 + CpF2cF6S4PL*CpF6F3V5PL*(Sqr(mext1) - Sqr(mext2))) - c0tmp2*CpF2cF6S4PL*
6532 CpF6F3V5PL*Sqr(mext2) + c0tmp2*CpF2cF6S4PL*CpF6F3V5PL*Sqr(mLS4)));
6533 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
6534 CpS1cS4cV5*(-(b0tmp1*CpF2cF6S4PR*CpF6F3V5PR) + 2*c2tmp4*CpF2cF6S4PL*
6535 CpF6F3V5PL*mext2*mext3 + 2*c0tmp2*CpF2cF6S4PL*CpF6F3V5PR*mext2*mLF6 -
6536 c0tmp2*CpF2cF6S4PR*CpF6F3V5PL*mext3*mLF6 + c1tmp3*CpF2cF6S4PL*mext2*(
6537 CpF6F3V5PL*mext3 + CpF6F3V5PR*mLF6) + c2tmp4*CpF2cF6S4PR*(CpF6F3V5PL*
6538 mext3*mLF6 + CpF6F3V5PR*(Sqr(mext1) - Sqr(mext2))) + c0tmp2*CpF2cF6S4PR*
6539 CpF6F3V5PR*Sqr(mext2) - c0tmp2*CpF2cF6S4PR*CpF6F3V5PR*Sqr(mLS4)));
6540
6541 return result;
6542}
6543
6564Decay_amplitude_SFF calculate_diagram_SFF_t1g5n5_VSF(
6565 double mext1, double mext2, double mext3,
6566 double mLV4, double mLS5, double mLF6,
6567 const std::complex<double>& CpF2cF6V4PR, const std::complex<double>&
6568 CpF2cF6V4PL, const std::complex<double>& CpF6F3S5PL, const std::complex<
6569 double>& CpF6F3S5PR, const std::complex<double>& CpS1cS5cV4,
6570 double scale)
6571{
6572 auto& lib = Loop_library::get();
6573
6574 looplibrary::Bcoeff_t B_coeffs;
6575 lib.B(B_coeffs, mext3*mext3, mLF6*mLF6, mLS5*mLS5, scale*scale);
6576
6577 looplibrary::Ccoeff_t C_coeffs;
6578 lib.C(C_coeffs, mext2*mext2, mext1*mext1, mext3*mext3, mLF6*mLF6, mLV4*mLV4,
6579 mLS5*mLS5, scale*scale);
6580
6581 const auto b0tmp1 = B_coeffs.at(0);
6582 const auto c0tmp2 = C_coeffs.at(0);
6583 const auto c1tmp3 = C_coeffs.at(1);
6584 const auto c2tmp4 = C_coeffs.at(2);
6585
6586 Decay_amplitude_SFF result;
6587
6588 result.m_decay = mext1;
6589 result.m_fermion_1 = mext2;
6590 result.m_fermion_2 = mext3;
6591
6592 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
6593 CpS1cS5cV4*(b0tmp1*CpF2cF6V4PR*CpF6F3S5PL - c2tmp4*CpF2cF6V4PL*CpF6F3S5PR
6594 *mext2*mext3 - c2tmp4*CpF2cF6V4PR*CpF6F3S5PR*mext3*mLF6 + c2tmp4*
6595 CpF2cF6V4PR*CpF6F3S5PL*Sqr(mext1) - c2tmp4*CpF2cF6V4PR*CpF6F3S5PL*Sqr(
6596 mext2) - c1tmp3*(CpF2cF6V4PL*mext2*(2*CpF6F3S5PR*mext3 + CpF6F3S5PL*mLF6)
6597 + CpF2cF6V4PR*CpF6F3S5PL*(2*Sqr(mext1) + Sqr(mext2) - 2*Sqr(mext3))) +
6598 c2tmp4*CpF2cF6V4PR*CpF6F3S5PL*Sqr(mext3) + c0tmp2*(CpF2cF6V4PL*CpF6F3S5PL
6599 *mext2*mLF6 - 2*CpF2cF6V4PR*CpF6F3S5PR*mext3*mLF6 + CpF2cF6V4PR*
6600 CpF6F3S5PL*(-Sqr(mext2) + Sqr(mLV4)))));
6601 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*
6602 CpS1cS5cV4*(-(b0tmp1*CpF2cF6V4PL*CpF6F3S5PR) + 2*c1tmp3*CpF2cF6V4PR*
6603 CpF6F3S5PL*mext2*mext3 + c1tmp3*CpF2cF6V4PR*CpF6F3S5PR*mext2*mLF6 + 2*
6604 c0tmp2*CpF2cF6V4PL*CpF6F3S5PL*mext3*mLF6 + c2tmp4*CpF6F3S5PL*mext3*(
6605 CpF2cF6V4PR*mext2 + CpF2cF6V4PL*mLF6) + 2*c1tmp3*CpF2cF6V4PL*CpF6F3S5PR*
6606 Sqr(mext1) + c1tmp3*CpF2cF6V4PL*CpF6F3S5PR*Sqr(mext2) - 2*c1tmp3*
6607 CpF2cF6V4PL*CpF6F3S5PR*Sqr(mext3) - c2tmp4*CpF2cF6V4PL*CpF6F3S5PR*(Sqr(
6608 mext1) - Sqr(mext2) + Sqr(mext3)) - c0tmp2*CpF6F3S5PR*(CpF2cF6V4PR*mext2*
6609 mLF6 + CpF2cF6V4PL*(-Sqr(mext2) + Sqr(mLV4)))));
6610
6611 return result;
6612}
6613
6635Decay_amplitude_SFF calculate_diagram_SFF_t1g6n6_VVF(
6636 double mext1, double mext2, double mext3,
6637 double mLV4, double mLV5, double mLF6,
6638 const std::complex<double>& CpF2cF6V4PL, const std::complex<double>&
6639 CpF2cF6V4PR, const std::complex<double>& CpF6F3V5PL, const std::complex<
6640 double>& CpF6F3V5PR, const std::complex<double>& CpS1cV4cV5,
6641 double scale)
6642{
6643 auto& lib = Loop_library::get();
6644
6645 looplibrary::Ccoeff_t C_coeffs;
6646 lib.C(C_coeffs, mext2*mext2, mext1*mext1, mext3*mext3, mLF6*mLF6, mLV4*mLV4,
6647 mLV5*mLV5, scale*scale);
6648
6649 const auto c0tmp1 = C_coeffs.at(0);
6650 const auto c1tmp2 = C_coeffs.at(1);
6651 const auto c2tmp3 = C_coeffs.at(2);
6652
6653 Decay_amplitude_SFF result;
6654
6655 result.m_decay = mext1;
6656 result.m_fermion_1 = mext2;
6657 result.m_fermion_2 = mext3;
6658
6659 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,2)*
6660 CpS1cV4cV5*(c1tmp2*CpF2cF6V4PL*CpF6F3V5PL*mext2 + c2tmp3*CpF2cF6V4PR*
6661 CpF6F3V5PR*mext3 + 2*c0tmp1*CpF2cF6V4PR*CpF6F3V5PL*mLF6));
6662 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,2)*
6663 CpS1cV4cV5*(c1tmp2*CpF2cF6V4PR*CpF6F3V5PR*mext2 + c2tmp3*CpF2cF6V4PL*
6664 CpF6F3V5PL*mext3 + 2*c0tmp1*CpF2cF6V4PL*CpF6F3V5PR*mLF6));
6665
6666 return result;
6667}
6668
6683Decay_amplitude_SFF calculate_diagram_SFF_t2g1n7_SS(
6684 double mext1, double mext2, double mext3,
6685 double mIS4, double mLS5,
6686 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
6687 CpF2F3cS4PR, const std::complex<double>& CpS1S4cS5S5,
6688 double scale)
6689{
6690 auto& lib = Loop_library::get();
6691
6692 looplibrary::Acoeff_t A_coeffs;
6693 lib.A(A_coeffs, mLS5*mLS5, scale*scale);
6694
6695 const auto a0tmp1 = A_coeffs.at(0);
6696
6697 Decay_amplitude_SFF result;
6698
6699 result.m_decay = mext1;
6700 result.m_fermion_1 = mext2;
6701 result.m_fermion_2 = mext3;
6702
6703 result.form_factor_left = oneOver16PiSqr*(0.5*a0tmp1*CpF2F3cS4PL*CpS1S4cS5S5
6704 *Den(Sqr(mext1),Sqr(mIS4)));
6705 result.form_factor_right = oneOver16PiSqr*(0.5*a0tmp1*CpF2F3cS4PR*
6706 CpS1S4cS5S5*Den(Sqr(mext1),Sqr(mIS4)));
6707
6708 return result;
6709}
6710
6725Decay_amplitude_SFF calculate_diagram_SFF_t2g2n8_SV(
6726 double mext1, double mext2, double mext3,
6727 double mIS4, double mLV5,
6728 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
6729 CpF2F3cS4PR, const std::complex<double>& CpS1S4cV5V5,
6730 double scale, double finite)
6731{
6732 auto& lib = Loop_library::get();
6733
6734 looplibrary::Acoeff_t A_coeffs;
6735 lib.A(A_coeffs, mLV5*mLV5, scale*scale);
6736
6737 const auto a0tmp1 = A_coeffs.at(0);
6738
6739 Decay_amplitude_SFF result;
6740
6741 result.m_decay = mext1;
6742 result.m_fermion_1 = mext2;
6743 result.m_fermion_2 = mext3;
6744
6745 result.form_factor_left = oneOver16PiSqr*(-(CpF2F3cS4PL*CpS1S4cV5V5*Den(Sqr(
6746 mext1),Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5))));
6747 result.form_factor_right = oneOver16PiSqr*(-(CpF2F3cS4PR*CpS1S4cV5V5*Den(Sqr
6748 (mext1),Sqr(mIS4))*(2*a0tmp1 - finite*Sqr(mLV5))));
6749
6750 return result;
6751}
6752
6771Decay_amplitude_SFF calculate_diagram_SFF_t3g1n9_FFS(
6772 double mext1, double mext2, double mext3,
6773 double mIF4, double mLF5, double mLS6,
6774 const std::complex<double>& CpF2cF4S1PL, const std::complex<double>&
6775 CpF2cF4S1PR, const std::complex<double>& CpF4F5S6PL, const std::complex<
6776 double>& CpF4F5S6PR, const std::complex<double>& CpcF5F3cS6PL, const std
6777 ::complex<double>& CpcF5F3cS6PR,
6778 double scale)
6779{
6780 auto& lib = Loop_library::get();
6781
6782 looplibrary::Bcoeff_t B_coeffs;
6783 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLS6*mLS6, scale*scale);
6784
6785 const auto b0tmp1 = B_coeffs.at(0);
6786 const auto b1tmp2 = B_coeffs.at(1);
6787
6788 Decay_amplitude_SFF result;
6789
6790 result.m_decay = mext1;
6791 result.m_fermion_1 = mext2;
6792 result.m_fermion_2 = mext3;
6793
6794 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*
6795 CpF2cF4S1PL*(-(b1tmp2*mext3*(CpcF5F3cS6PL*CpF4F5S6PR*mext3 + CpcF5F3cS6PR
6796 *CpF4F5S6PL*mIF4)) + b0tmp1*(CpcF5F3cS6PR*CpF4F5S6PR*mext3 + CpcF5F3cS6PL
6797 *CpF4F5S6PL*mIF4)*mLF5)*Den(Sqr(mext3),Sqr(mIF4)));
6798 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*
6799 CpF2cF4S1PR*(-(b1tmp2*mext3*(CpcF5F3cS6PR*CpF4F5S6PL*mext3 + CpcF5F3cS6PL
6800 *CpF4F5S6PR*mIF4)) + b0tmp1*(CpcF5F3cS6PL*CpF4F5S6PL*mext3 + CpcF5F3cS6PR
6801 *CpF4F5S6PR*mIF4)*mLF5)*Den(Sqr(mext3),Sqr(mIF4)));
6802
6803 return result;
6804}
6805
6828Decay_amplitude_SFF calculate_diagram_SFF_t3g2n10_FFV(
6829 double mext1, double mext2, double mext3,
6830 double mIF4, double mLF5, double mLV6,
6831 const std::complex<double>& CpF2cF4S1PL, const std::complex<double>&
6832 CpF2cF4S1PR, const std::complex<double>& CpF4F5V6PL, const std::complex<
6833 double>& CpF4F5V6PR, const std::complex<double>& CpcF5F3cV6PL, const std
6834 ::complex<double>& CpcF5F3cV6PR,
6835 double scale, double finite)
6836{
6837 auto& lib = Loop_library::get();
6838
6839 looplibrary::Bcoeff_t B_coeffs;
6840 lib.B(B_coeffs, mext3*mext3, mLF5*mLF5, mLV6*mLV6, scale*scale);
6841
6842 const auto b0tmp1 = B_coeffs.at(0);
6843 const auto b1tmp2 = B_coeffs.at(1);
6844
6845 Decay_amplitude_SFF result;
6846
6847 result.m_decay = mext1;
6848 result.m_fermion_1 = mext2;
6849 result.m_fermion_2 = mext3;
6850
6851 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
6852 CpF2cF4S1PL*Den(Sqr(mext3),Sqr(mIF4))*(-2*CpcF5F3cV6PR*CpF4F5V6PL*(-2*
6853 b0tmp1 + finite)*mext3*mLF5 + CpF4F5V6PR*mIF4*(CpcF5F3cV6PR*(2*b1tmp2 +
6854 finite)*mext3 - 2*CpcF5F3cV6PL*(-2*b0tmp1 + finite)*mLF5) + CpcF5F3cV6PL*
6855 CpF4F5V6PL*(2*b1tmp2 + finite)*Sqr(mext3)));
6856 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
6857 CpF2cF4S1PR*Den(Sqr(mext3),Sqr(mIF4))*(CpcF5F3cV6PL*CpF4F5V6PL*(2*b1tmp2
6858 + finite)*mext3*mIF4 - 2*CpcF5F3cV6PL*CpF4F5V6PR*(-2*b0tmp1 + finite)*
6859 mext3*mLF5 - 2*CpcF5F3cV6PR*CpF4F5V6PL*(-2*b0tmp1 + finite)*mIF4*mLF5 +
6860 CpcF5F3cV6PR*CpF4F5V6PR*(2*b1tmp2 + finite)*Sqr(mext3)));
6861
6862 return result;
6863}
6864
6883Decay_amplitude_SFF calculate_diagram_SFF_t4g1n11_FFS(
6884 double mext1, double mext2, double mext3,
6885 double mIF4, double mLF5, double mLS6,
6886 const std::complex<double>& CpcF4F3S1PL, const std::complex<double>&
6887 CpcF4F3S1PR, const std::complex<double>& CpF2cF5cS6PL, const std::complex
6888 <double>& CpF2cF5cS6PR, const std::complex<double>& CpF5F4S6PL, const std
6889 ::complex<double>& CpF5F4S6PR,
6890 double scale)
6891{
6892 auto& lib = Loop_library::get();
6893
6894 looplibrary::Bcoeff_t B_coeffs;
6895 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLS6*mLS6, scale*scale);
6896
6897 const auto b0tmp1 = B_coeffs.at(0);
6898 const auto b1tmp2 = B_coeffs.at(1);
6899
6900 Decay_amplitude_SFF result;
6901
6902 result.m_decay = mext1;
6903 result.m_fermion_1 = mext2;
6904 result.m_fermion_2 = mext3;
6905
6906 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*
6907 CpcF4F3S1PL*(-(b1tmp2*mext2*(CpF2cF5cS6PL*CpF5F4S6PR*mext2 + CpF2cF5cS6PR
6908 *CpF5F4S6PL*mIF4)) + b0tmp1*(CpF2cF5cS6PR*CpF5F4S6PR*mext2 + CpF2cF5cS6PL
6909 *CpF5F4S6PL*mIF4)*mLF5)*Den(Sqr(mext2),Sqr(mIF4)));
6910 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*
6911 CpcF4F3S1PR*(-(b1tmp2*mext2*(CpF2cF5cS6PR*CpF5F4S6PL*mext2 + CpF2cF5cS6PL
6912 *CpF5F4S6PR*mIF4)) + b0tmp1*(CpF2cF5cS6PL*CpF5F4S6PL*mext2 + CpF2cF5cS6PR
6913 *CpF5F4S6PR*mIF4)*mLF5)*Den(Sqr(mext2),Sqr(mIF4)));
6914
6915 return result;
6916}
6917
6940Decay_amplitude_SFF calculate_diagram_SFF_t4g2n12_FFV(
6941 double mext1, double mext2, double mext3,
6942 double mIF4, double mLF5, double mLV6,
6943 const std::complex<double>& CpcF4F3S1PL, const std::complex<double>&
6944 CpcF4F3S1PR, const std::complex<double>& CpF2cF5cV6PL, const std::complex
6945 <double>& CpF2cF5cV6PR, const std::complex<double>& CpF5F4V6PL, const std
6946 ::complex<double>& CpF5F4V6PR,
6947 double scale, double finite)
6948{
6949 auto& lib = Loop_library::get();
6950
6951 looplibrary::Bcoeff_t B_coeffs;
6952 lib.B(B_coeffs, mext2*mext2, mLF5*mLF5, mLV6*mLV6, scale*scale);
6953
6954 const auto b0tmp1 = B_coeffs.at(0);
6955 const auto b1tmp2 = B_coeffs.at(1);
6956
6957 Decay_amplitude_SFF result;
6958
6959 result.m_decay = mext1;
6960 result.m_fermion_1 = mext2;
6961 result.m_fermion_2 = mext3;
6962
6963 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
6964 CpcF4F3S1PL*Den(Sqr(mext2),Sqr(mIF4))*(CpF2cF5cV6PL*CpF5F4V6PL*(2*b1tmp2
6965 + finite)*mext2*mIF4 - 2*CpF2cF5cV6PL*CpF5F4V6PR*(-2*b0tmp1 + finite)*
6966 mext2*mLF5 - 2*CpF2cF5cV6PR*CpF5F4V6PL*(-2*b0tmp1 + finite)*mIF4*mLF5 +
6967 CpF2cF5cV6PR*CpF5F4V6PR*(2*b1tmp2 + finite)*Sqr(mext2)));
6968 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
6969 CpcF4F3S1PR*Den(Sqr(mext2),Sqr(mIF4))*(-2*CpF2cF5cV6PL*CpF5F4V6PR*(-2*
6970 b0tmp1 + finite)*mIF4*mLF5 + CpF2cF5cV6PR*mext2*(CpF5F4V6PR*(2*b1tmp2 +
6971 finite)*mIF4 - 2*CpF5F4V6PL*(-2*b0tmp1 + finite)*mLF5) + CpF2cF5cV6PL*
6972 CpF5F4V6PL*(2*b1tmp2 + finite)*Sqr(mext2)));
6973
6974 return result;
6975}
6976
6995Decay_amplitude_SFF calculate_diagram_SFF_t5g1n13_SFF(
6996 double mext1, double mext2, double mext3,
6997 double mIS4, double mLF5, double mLF6,
6998 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
6999 CpF2F3cS4PR, const std::complex<double>& CpF5F6S4PL, const std::complex<
7000 double>& CpF5F6S4PR, const std::complex<double>& CpcF6cF5S1PL, const std
7001 ::complex<double>& CpcF6cF5S1PR,
7002 double scale)
7003{
7004 auto& lib = Loop_library::get();
7005
7006 looplibrary::Acoeff_t A_coeffs;
7007 lib.A(A_coeffs, mLF6*mLF6, scale*scale);
7008
7009 looplibrary::Bcoeff_t B_coeffs;
7010 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
7011
7012 const auto a0tmp1 = A_coeffs.at(0);
7013 const auto b0tmp2 = B_coeffs.at(0);
7014 const auto b1tmp3 = B_coeffs.at(1);
7015
7016 Decay_amplitude_SFF result;
7017
7018 result.m_decay = mext1;
7019 result.m_fermion_1 = mext2;
7020 result.m_fermion_2 = mext3;
7021
7022 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
7023 CpF2F3cS4PL*Den(Sqr(mext1),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S1PR*
7024 CpF5F6S4PL*mLF5 + CpcF6cF5S1PL*CpF5F6S4PR*mLF5 + CpcF6cF5S1PL*CpF5F6S4PL*
7025 mLF6 + CpcF6cF5S1PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S1PR*CpF5F6S4PL +
7026 CpcF6cF5S1PL*CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext1))));
7027 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
7028 CpF2F3cS4PR*Den(Sqr(mext1),Sqr(mIS4))*(b0tmp2*mLF5*(CpcF6cF5S1PR*
7029 CpF5F6S4PL*mLF5 + CpcF6cF5S1PL*CpF5F6S4PR*mLF5 + CpcF6cF5S1PL*CpF5F6S4PL*
7030 mLF6 + CpcF6cF5S1PR*CpF5F6S4PR*mLF6) + (CpcF6cF5S1PR*CpF5F6S4PL +
7031 CpcF6cF5S1PL*CpF5F6S4PR)*(a0tmp1 + b1tmp3*Sqr(mext1))));
7032
7033 return result;
7034}
7035
7052Decay_amplitude_SFF calculate_diagram_SFF_t5g2n14_SSS(
7053 double mext1, double mext2, double mext3,
7054 double mIS4, double mLS5, double mLS6,
7055 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
7056 CpF2F3cS4PR, const std::complex<double>& CpS1cS5cS6, const std::complex<
7057 double>& CpS4S5S6,
7058 double scale)
7059{
7060 auto& lib = Loop_library::get();
7061
7062 looplibrary::Bcoeff_t B_coeffs;
7063 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
7064
7065 const auto b0tmp1 = B_coeffs.at(0);
7066
7067 Decay_amplitude_SFF result;
7068
7069 result.m_decay = mext1;
7070 result.m_fermion_1 = mext2;
7071 result.m_fermion_2 = mext3;
7072
7073 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,0.5)*b0tmp1
7074 *CpF2F3cS4PL*CpS1cS5cS6*CpS4S5S6*Den(Sqr(mext1),Sqr(mIS4)));
7075 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,0.5)*
7076 b0tmp1*CpF2F3cS4PR*CpS1cS5cS6*CpS4S5S6*Den(Sqr(mext1),Sqr(mIS4)));
7077
7078 return result;
7079}
7080
7097Decay_amplitude_SFF calculate_diagram_SFF_t5g3n15_SUU(
7098 double mext1, double mext2, double mext3,
7099 double mIS4, double mLU5, double mLU6,
7100 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
7101 CpF2F3cS4PR, const std::complex<double>& CpS1cU6cU5, const std::complex<
7102 double>& CpS4U5U6,
7103 double scale)
7104{
7105 auto& lib = Loop_library::get();
7106
7107 looplibrary::Bcoeff_t B_coeffs;
7108 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
7109
7110 const auto b0tmp1 = B_coeffs.at(0);
7111
7112 Decay_amplitude_SFF result;
7113
7114 result.m_decay = mext1;
7115 result.m_fermion_1 = mext2;
7116 result.m_fermion_2 = mext3;
7117
7118 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-0.5)*
7119 b0tmp1*CpF2F3cS4PL*CpS1cU6cU5*CpS4U5U6*Den(Sqr(mext1),Sqr(mIS4)));
7120 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-0.5)*
7121 b0tmp1*CpF2F3cS4PR*CpS1cU6cU5*CpS4U5U6*Den(Sqr(mext1),Sqr(mIS4)));
7122
7123 return result;
7124}
7125
7143Decay_amplitude_SFF calculate_diagram_SFF_t5g4n16_SSV(
7144 double mext1, double mext2, double mext3,
7145 double mIS4, double mLS5, double mLV6,
7146 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
7147 CpF2F3cS4PR, const std::complex<double>& CpS1cS5cV6, const std::complex<
7148 double>& CpS4S5V6,
7149 double scale)
7150{
7151 auto& lib = Loop_library::get();
7152
7153 looplibrary::Acoeff_t A_coeffs;
7154 lib.A(A_coeffs, mLV6*mLV6, scale*scale);
7155
7156 looplibrary::Bcoeff_t B_coeffs;
7157 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
7158
7159 const auto a0tmp1 = A_coeffs.at(0);
7160 const auto b0tmp2 = B_coeffs.at(0);
7161 const auto b1tmp3 = B_coeffs.at(1);
7162
7163 Decay_amplitude_SFF result;
7164
7165 result.m_decay = mext1;
7166 result.m_fermion_1 = mext2;
7167 result.m_fermion_2 = mext3;
7168
7169 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*
7170 CpF2F3cS4PL*CpS1cS5cV6*CpS4S5V6*Den(Sqr(mext1),Sqr(mIS4))*(a0tmp1 - 2*
7171 b1tmp3*Sqr(mext1) + b0tmp2*(Sqr(mext1) + Sqr(mLS5))));
7172 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*
7173 CpF2F3cS4PR*CpS1cS5cV6*CpS4S5V6*Den(Sqr(mext1),Sqr(mIS4))*(a0tmp1 - 2*
7174 b1tmp3*Sqr(mext1) + b0tmp2*(Sqr(mext1) + Sqr(mLS5))));
7175
7176 return result;
7177}
7178
7195Decay_amplitude_SFF calculate_diagram_SFF_t5g5n17_SVV(
7196 double mext1, double mext2, double mext3,
7197 double mIS4, double mLV5, double mLV6,
7198 const std::complex<double>& CpF2F3cS4PL, const std::complex<double>&
7199 CpF2F3cS4PR, const std::complex<double>& CpS1cV5cV6, const std::complex<
7200 double>& CpS4V5V6,
7201 double scale, double finite)
7202{
7203 auto& lib = Loop_library::get();
7204
7205 looplibrary::Bcoeff_t B_coeffs;
7206 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
7207
7208 const auto b0tmp1 = B_coeffs.at(0);
7209
7210 Decay_amplitude_SFF result;
7211
7212 result.m_decay = mext1;
7213 result.m_fermion_1 = mext2;
7214 result.m_fermion_2 = mext3;
7215
7216 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1)*
7217 CpF2F3cS4PL*CpS1cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext1),Sqr(
7218 mIS4)));
7219 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,-1)*
7220 CpF2F3cS4PR*CpS1cV5cV6*CpS4V5V6*(-2*b0tmp1 + finite)*Den(Sqr(mext1),Sqr(
7221 mIS4)));
7222
7223 return result;
7224}
7225
7248Decay_amplitude_SFF calculate_diagram_SFF_t5g6n18_VFF(
7249 double mext1, double mext2, double mext3,
7250 double mIV4, double mLF5, double mLF6,
7251 const std::complex<double>& CpF2F3cV4PL, const std::complex<double>&
7252 CpF2F3cV4PR, const std::complex<double>& CpF5F6V4PR, const std::complex<
7253 double>& CpF5F6V4PL, const std::complex<double>& CpcF6cF5S1PL, const std
7254 ::complex<double>& CpcF6cF5S1PR,
7255 double scale)
7256{
7257 auto& lib = Loop_library::get();
7258
7259 looplibrary::Bcoeff_t B_coeffs;
7260 lib.B(B_coeffs, mext1*mext1, mLF5*mLF5, mLF6*mLF6, scale*scale);
7261
7262 const auto b0tmp1 = B_coeffs.at(0);
7263 const auto b1tmp2 = B_coeffs.at(1);
7264
7265 Decay_amplitude_SFF result;
7266
7267 result.m_decay = mext1;
7268 result.m_fermion_1 = mext2;
7269 result.m_fermion_2 = mext3;
7270
7271 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*(
7272 CpF2F3cV4PL*mext2 - CpF2F3cV4PR*mext3)*(b0tmp1*(CpcF6cF5S1PR*CpF5F6V4PL +
7273 CpcF6cF5S1PL*CpF5F6V4PR)*mLF5 + b1tmp2*(CpcF6cF5S1PR*CpF5F6V4PL*mLF5 +
7274 CpcF6cF5S1PL*CpF5F6V4PR*mLF5 + CpcF6cF5S1PL*CpF5F6V4PL*mLF6 +
7275 CpcF6cF5S1PR*CpF5F6V4PR*mLF6))*Den(Sqr(mext1),Sqr(mIV4)));
7276 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*(
7277 CpF2F3cV4PR*mext2 - CpF2F3cV4PL*mext3)*(b0tmp1*(CpcF6cF5S1PR*CpF5F6V4PL +
7278 CpcF6cF5S1PL*CpF5F6V4PR)*mLF5 + b1tmp2*(CpcF6cF5S1PR*CpF5F6V4PL*mLF5 +
7279 CpcF6cF5S1PL*CpF5F6V4PR*mLF5 + CpcF6cF5S1PL*CpF5F6V4PL*mLF6 +
7280 CpcF6cF5S1PR*CpF5F6V4PR*mLF6))*Den(Sqr(mext1),Sqr(mIV4)));
7281
7282 return result;
7283}
7284
7303Decay_amplitude_SFF calculate_diagram_SFF_t5g7n19_VSS(
7304 double mext1, double mext2, double mext3,
7305 double mIV4, double mLS5, double mLS6,
7306 const std::complex<double>& CpF2F3cV4PL, const std::complex<double>&
7307 CpF2F3cV4PR, const std::complex<double>& CpS1cS5cS6, const std::complex<
7308 double>& CpS5S6V4,
7309 double scale)
7310{
7311 auto& lib = Loop_library::get();
7312
7313 looplibrary::Bcoeff_t B_coeffs;
7314 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLS6*mLS6, scale*scale);
7315
7316 const auto b0tmp1 = B_coeffs.at(0);
7317 const auto b1tmp2 = B_coeffs.at(1);
7318
7319 Decay_amplitude_SFF result;
7320
7321 result.m_decay = mext1;
7322 result.m_fermion_1 = mext2;
7323 result.m_fermion_2 = mext3;
7324
7325 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,0.5)*(
7326 b0tmp1 + 2*b1tmp2)*CpS1cS5cS6*CpS5S6V4*(CpF2F3cV4PL*mext2 - CpF2F3cV4PR*
7327 mext3)*Den(Sqr(mext1),Sqr(mIV4)));
7328 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,0.5)*(
7329 b0tmp1 + 2*b1tmp2)*CpS1cS5cS6*CpS5S6V4*(CpF2F3cV4PR*mext2 - CpF2F3cV4PL*
7330 mext3)*Den(Sqr(mext1),Sqr(mIV4)));
7331
7332 return result;
7333}
7334
7353Decay_amplitude_SFF calculate_diagram_SFF_t5g8n20_VUU(
7354 double mext1, double mext2, double mext3,
7355 double mIV4, double mLU5, double mLU6,
7356 const std::complex<double>& CpF2F3cV4PL, const std::complex<double>&
7357 CpF2F3cV4PR, const std::complex<double>& CpS1cU6cU5, const std::complex<
7358 double>& CpU5U6V4,
7359 double scale)
7360{
7361 auto& lib = Loop_library::get();
7362
7363 looplibrary::Bcoeff_t B_coeffs;
7364 lib.B(B_coeffs, mext1*mext1, mLU5*mLU5, mLU6*mLU6, scale*scale);
7365
7366 const auto b1tmp1 = B_coeffs.at(1);
7367
7368 Decay_amplitude_SFF result;
7369
7370 result.m_decay = mext1;
7371 result.m_fermion_1 = mext2;
7372 result.m_fermion_2 = mext3;
7373
7374 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-0.5)*
7375 b1tmp1*CpS1cU6cU5*CpU5U6V4*(CpF2F3cV4PL*mext2 - CpF2F3cV4PR*mext3)*Den(
7376 Sqr(mext1),Sqr(mIV4)));
7377 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,0.5)*
7378 b1tmp1*CpS1cU6cU5*CpU5U6V4*(-(CpF2F3cV4PR*mext2) + CpF2F3cV4PL*mext3)*Den
7379 (Sqr(mext1),Sqr(mIV4)));
7380
7381 return result;
7382}
7383
7403Decay_amplitude_SFF calculate_diagram_SFF_t5g9n21_VSV(
7404 double mext1, double mext2, double mext3,
7405 double mIV4, double mLS5, double mLV6,
7406 const std::complex<double>& CpF2F3cV4PL, const std::complex<double>&
7407 CpF2F3cV4PR, const std::complex<double>& CpS1cS5cV6, const std::complex<
7408 double>& CpS5V4V6,
7409 double scale)
7410{
7411 auto& lib = Loop_library::get();
7412
7413 looplibrary::Bcoeff_t B_coeffs;
7414 lib.B(B_coeffs, mext1*mext1, mLS5*mLS5, mLV6*mLV6, scale*scale);
7415
7416 const auto b0tmp1 = B_coeffs.at(0);
7417 const auto b1tmp2 = B_coeffs.at(1);
7418
7419 Decay_amplitude_SFF result;
7420
7421 result.m_decay = mext1;
7422 result.m_fermion_1 = mext2;
7423 result.m_fermion_2 = mext3;
7424
7425 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1
7426 - b1tmp2)*CpS1cS5cV6*CpS5V4V6*(CpF2F3cV4PL*mext2 - CpF2F3cV4PR*mext3)*Den
7427 (Sqr(mext1),Sqr(mIV4)));
7428 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1)*(b0tmp1
7429 - b1tmp2)*CpS1cS5cV6*CpS5V4V6*(CpF2F3cV4PR*mext2 - CpF2F3cV4PL*mext3)*
7430 Den(Sqr(mext1),Sqr(mIV4)));
7431
7432 return result;
7433}
7434
7455Decay_amplitude_SFF calculate_diagram_SFF_t5g10n22_VVV(
7456 double mext1, double mext2, double mext3,
7457 double mIV4, double mLV5, double mLV6,
7458 const std::complex<double>& CpF2F3cV4PL, const std::complex<double>&
7459 CpF2F3cV4PR, const std::complex<double>& CpS1cV5cV6, const std::complex<
7460 double>& CpV4V5V6,
7461 double scale)
7462{
7463 auto& lib = Loop_library::get();
7464
7465 looplibrary::Bcoeff_t B_coeffs;
7466 lib.B(B_coeffs, mext1*mext1, mLV5*mLV5, mLV6*mLV6, scale*scale);
7467
7468 const auto b0tmp1 = B_coeffs.at(0);
7469 const auto b1tmp2 = B_coeffs.at(1);
7470
7471 Decay_amplitude_SFF result;
7472
7473 result.m_decay = mext1;
7474 result.m_fermion_1 = mext2;
7475 result.m_fermion_2 = mext3;
7476
7477 result.form_factor_left = oneOver16PiSqr*(std::complex<double>(0,-1.5)*(
7478 b0tmp1 + 2*b1tmp2)*CpS1cV5cV6*CpV4V5V6*(CpF2F3cV4PL*mext2 - CpF2F3cV4PR*
7479 mext3)*Den(Sqr(mext1),Sqr(mIV4)));
7480 result.form_factor_right = oneOver16PiSqr*(std::complex<double>(0,1.5)*(
7481 b0tmp1 + 2*b1tmp2)*CpS1cV5cV6*CpV4V5V6*(-(CpF2F3cV4PR*mext2) +
7482 CpF2F3cV4PL*mext3)*Den(Sqr(mext1),Sqr(mIV4)));
7483
7484 return result;
7485}
7486
7487
7488} // namespace flexiblesusy
flexiblesusy::Loop_library::get
static looplibrary::Loop_library_interface & get()
Definition loop_library.cpp:117
loop_library.hpp
flexiblesusy::anonymous_namespace{one_loop_decay_diagrams.cpp}::Den
double Den(double x2, double y2)
Definition one_loop_decay_diagrams.cpp:27
flexiblesusy::looplibrary::Ccoeff_t
std::array< std::complex< double >, BOOST_PP_SEQ_SIZE((0)(1)(2)(00)(11)(12)(22)) > Ccoeff_t
Definition loop_library_interface.hpp:73
flexiblesusy::looplibrary::Acoeff_t
std::array< std::complex< double >, BOOST_PP_SEQ_SIZE((0)) > Acoeff_t
Definition loop_library_interface.hpp:70
flexiblesusy::looplibrary::Bcoeff_t
std::array< std::complex< double >, BOOST_PP_SEQ_SIZE((0)(1)(00)) > Bcoeff_t
Definition loop_library_interface.hpp:71
flexiblesusy::calculate_diagram_SSV_t9g10n40_VVV
Decay_amplitude_SSV calculate_diagram_SSV_t9g10n40_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpS2cV5cV6, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T9G10N40 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5812
flexiblesusy::calculate_diagram_SSV_t4g1n15_SV
Decay_amplitude_SSV calculate_diagram_SSV_t4g1n15_SV(double mext1, double mext2, double mext3, double mLS4, double mLV5, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS2S4V3V5, double scale)
Evaluates T4G1N15 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5054
flexiblesusy::calculate_diagram_SVV_t2g1n11_VS
Decay_amplitude_SVV calculate_diagram_SVV_t2g1n11_VS(double mext1, double mext2, double mext3, double mIV4, double mLS5, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpcS5S5V3V4, double scale)
Evaluates T2G1N11 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3053
flexiblesusy::calculate_diagram_SSS_t10g3n45_SUU
Decay_amplitude_SSS calculate_diagram_SSS_t10g3n45_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T10G3N45 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2024
flexiblesusy::calculate_diagram_SSV_t10g4n44_SSV
Decay_amplitude_SSV calculate_diagram_SSV_t10g4n44_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T10G4N44 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5989
flexiblesusy::calculate_diagram_SVV_t10g8n48_VUU
Decay_amplitude_SVV calculate_diagram_SVV_t10g8n48_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpU5U6V4, const std::complex< double > &CpV2V3cV4, double scale)
Evaluates T10G8N48 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4258
flexiblesusy::calculate_diagram_SSV_t1g3n3_UUU
Decay_amplitude_SSV calculate_diagram_SSV_t1g3n3_UUU(double mext1, double mext2, double mext3, double mLU4, double mLU5, double mLU6, const std::complex< double > &CpS1cU4cU5, const std::complex< double > &CpS2cU6U4, const std::complex< double > &CpU5U6V3, double scale)
Evaluates T1G3N3 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4509
flexiblesusy::calculate_diagram_SFF_t5g2n14_SSS
Decay_amplitude_SFF calculate_diagram_SFF_t5g2n14_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T5G2N14 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7052
flexiblesusy::calculate_diagram_SSS_t10g5n47_SVV
Decay_amplitude_SSS calculate_diagram_SSS_t10g5n47_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T10G5N47 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2113
flexiblesusy::calculate_diagram_SSV_t1g8n8_VSV
Decay_amplitude_SSV calculate_diagram_SSV_t1g8n8_VSV(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS2V4cV6, const std::complex< double > &CpS5V3V6, double scale)
Evaluates T1G8N8 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4758
flexiblesusy::calculate_diagram_SVV_t9g10n40_VVV
Decay_amplitude_SVV calculate_diagram_SVV_t9g10n40_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpV2cV5cV6, const std::complex< double > &CpV4V5V6, double scale, double finite)
Evaluates T9G10N40 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3886
flexiblesusy::calculate_diagram_SSV_t8g10n30_VVV
Decay_amplitude_SSV calculate_diagram_SSV_t8g10n30_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpV3cV5cV6, const std::complex< double > &CpV4V5V6, double scale, double finite)
Evaluates T8G10N30 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5361
flexiblesusy::calculate_diagram_SFF_t2g1n7_SS
Decay_amplitude_SFF calculate_diagram_SFF_t2g1n7_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1S4cS5S5, double scale)
Evaluates T2G1N7 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6683
flexiblesusy::calculate_diagram_SVV_t10g2n42_SSS
Decay_amplitude_SVV calculate_diagram_SVV_t10g2n42_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T10G2N42 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3988
flexiblesusy::calculate_diagram_SFF_t1g5n5_VSF
Decay_amplitude_SFF calculate_diagram_SFF_t1g5n5_VSF(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLF6, const std::complex< double > &CpF2cF6V4PR, const std::complex< double > &CpF2cF6V4PL, const std::complex< double > &CpF6F3S5PL, const std::complex< double > &CpF6F3S5PR, const std::complex< double > &CpS1cS5cV4, double scale)
Evaluates T1G5N5 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6564
flexiblesusy::calculate_diagram_SSV_t10g9n49_VSV
Decay_amplitude_SSV calculate_diagram_SSV_t10g9n49_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS2V3cV4, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T10G9N49 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6211
flexiblesusy::calculate_diagram_SVV_t9g6n36_VFF
Decay_amplitude_SVV calculate_diagram_SVV_t9g6n36_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpcF6cF5V2PL, const std::complex< double > &CpcF6cF5V2PR, const std::complex< double > &CpS1V3cV4, double scale)
Evaluates T9G6N36 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3705
flexiblesusy::calculate_diagram_SSS_t8g1n23_SFF
Decay_amplitude_SSS calculate_diagram_SSS_t8g1n23_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S3PL, const std::complex< double > &CpcF6cF5S3PR, const std::complex< double > &CpS1S2cS4, double scale)
Evaluates T8G1N23 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1033
flexiblesusy::calculate_diagram_SSS_t7g1n21_SS
Decay_amplitude_SSS calculate_diagram_SSS_t7g1n21_SS(double mext1, double mext2, double mext3, double mLS4, double mLS5, const std::complex< double > &CpS3cS4cS5, const std::complex< double > &CpS1S2S4S5, double scale)
Evaluates T7G1N21 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:952
flexiblesusy::calculate_diagram_SFF_t5g3n15_SUU
Decay_amplitude_SFF calculate_diagram_SFF_t5g3n15_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T5G3N15 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7097
flexiblesusy::calculate_diagram_SVV_t3g1n13_VS
Decay_amplitude_SVV calculate_diagram_SVV_t3g1n13_VS(double mext1, double mext2, double mext3, double mIV4, double mLS5, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpcS5S5V2V4, double scale)
Evaluates T3G1N13 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3138
flexiblesusy::calculate_diagram_SSS_t8g8n30_VUU
Decay_amplitude_SSS calculate_diagram_SSS_t8g8n30_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpS3cU6cU5, const std::complex< double > &CpU5U6V41, const std::complex< double > &CpU5U6V42, double scale)
Evaluates T8G8N30 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1348
flexiblesusy::calculate_diagram_SVV_t1g2n2_SSS
Decay_amplitude_SVV calculate_diagram_SVV_t1g2n2_SSS(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS4cS6V2, const std::complex< double > &CpS5S6V3, double scale)
Evaluates T1G2N2 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2547
flexiblesusy::calculate_diagram_SSS_t1g3n3_UUU
Decay_amplitude_SSS calculate_diagram_SSS_t1g3n3_UUU(double mext1, double mext2, double mext3, double mLU4, double mLU5, double mLU6, const std::complex< double > &CpS1cU4cU5, const std::complex< double > &CpS2cU6U4, const std::complex< double > &CpS3U5U6, double scale)
Evaluates T1G3N3 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:176
flexiblesusy::calculate_diagram_SSV_t10g10n50_VVV
Decay_amplitude_SSV calculate_diagram_SSV_t10g10n50_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpS2V3cV4, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T10G10N50 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6255
flexiblesusy::calculate_diagram_SSV_t2g2n12_VV
Decay_amplitude_SSV calculate_diagram_SSV_t2g2n12_VV(double mext1, double mext2, double mext3, double mIV4, double mLV5, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpV3V4cV5V51, const std::complex< double > &CpV3V4cV5V52, const std::complex< double > &CpV3V4cV5V53, double scale, double finite)
Evaluates T2G2N12 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4934
flexiblesusy::calculate_diagram_SSV_t10g8n48_VUU
Decay_amplitude_SSV calculate_diagram_SSV_t10g8n48_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpS2V3cV4, const std::complex< double > &CpU5U6V4, double scale)
Evaluates T10G8N48 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6169
flexiblesusy::calculate_diagram_SSS_t10g4n46_SSV
Decay_amplitude_SSS calculate_diagram_SSS_t10g4n46_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T10G4N46 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2066
flexiblesusy::calculate_diagram_SSS_t9g4n36_SSV
Decay_amplitude_SSS calculate_diagram_SSS_t9g4n36_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2cS5cV6, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T9G4N36 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1616
flexiblesusy::calculate_diagram_SFF_t3g2n10_FFV
Decay_amplitude_SFF calculate_diagram_SFF_t3g2n10_FFV(double mext1, double mext2, double mext3, double mIF4, double mLF5, double mLV6, const std::complex< double > &CpF2cF4S1PL, const std::complex< double > &CpF2cF4S1PR, const std::complex< double > &CpF4F5V6PL, const std::complex< double > &CpF4F5V6PR, const std::complex< double > &CpcF5F3cV6PL, const std ::complex< double > &CpcF5F3cV6PR, double scale, double finite)
Evaluates T3G2N10 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6828
flexiblesusy::calculate_diagram_SVV_t10g4n44_SSV
Decay_amplitude_SVV calculate_diagram_SVV_t10g4n44_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T10G4N44 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4071
flexiblesusy::calculate_diagram_SSS_t1g10n10_VVV
Decay_amplitude_SSS calculate_diagram_SSS_t1g10n10_VVV(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpS2V4cV6, const std::complex< double > &CpS3V5V6, double scale)
Evaluates T1G10N10 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:524
flexiblesusy::calculate_diagram_SSV_t10g5n45_SVV
Decay_amplitude_SSV calculate_diagram_SSV_t10g5n45_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T10G5N45 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6036
flexiblesusy::calculate_diagram_SSS_t1g8n8_VSV
Decay_amplitude_SSS calculate_diagram_SSS_t1g8n8_VSV(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS2V4cV6, const std::complex< double > &CpS3S5V6, double scale)
Evaluates T1G8N8 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:422
flexiblesusy::calculate_diagram_SVV_t2g2n12_VV
Decay_amplitude_SVV calculate_diagram_SVV_t2g2n12_VV(double mext1, double mext2, double mext3, double mIV4, double mLV5, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpV3V4cV5V51, const std::complex< double > &CpV3V4cV5V52, const std::complex< double > &CpV3V4cV5V53, double scale, double finite)
Evaluates T2G2N12 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3097
flexiblesusy::calculate_diagram_SSS_t4g1n15_SS
Decay_amplitude_SSS calculate_diagram_SSS_t4g1n15_SS(double mext1, double mext2, double mext3, double mLS4, double mLS5, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS2S3S4S5, double scale)
Evaluates T4G1N15 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:720
flexiblesusy::calculate_diagram_SSS_t6g2n20_VV
Decay_amplitude_SSS calculate_diagram_SSS_t6g2n20_VV(double mext1, double mext2, double mext3, double mLV4, double mLV5, const std::complex< double > &CpS2cV4cV5, const std::complex< double > &CpS1S3V4V5, double scale, double finite)
Evaluates T6G2N20 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:913
flexiblesusy::calculate_diagram_SSV_t1g5n5_SVS
Decay_amplitude_SSV calculate_diagram_SSV_t1g5n5_SVS(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLS6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS2S4cS6, const std::complex< double > &CpS6V3V5, double scale)
Evaluates T1G5N5 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4598
flexiblesusy::calculate_diagram_SVV_t8g8n28_VUU
Decay_amplitude_SVV calculate_diagram_SVV_t8g8n28_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpU5U6V4, const std::complex< double > &CpcU6cU5V3, double scale)
Evaluates T8G8N28 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3563
flexiblesusy::calculate_diagram_SSS_t9g9n41_VSV
Decay_amplitude_SSS calculate_diagram_SSS_t9g9n41_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1S3cV4, const std::complex< double > &CpS2cS5cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T9G9N41 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1843
flexiblesusy::calculate_diagram_SSS_t10g7n49_VSS
Decay_amplitude_SSS calculate_diagram_SSS_t10g7n49_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS2S3cV4, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T10G7N49 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2204
flexiblesusy::calculate_diagram_SSS_t1g5n5_SVS
Decay_amplitude_SSS calculate_diagram_SSS_t1g5n5_SVS(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLS6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS2S4cS6, const std::complex< double > &CpS3S6V5, double scale)
Evaluates T1G5N5 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:269
flexiblesusy::calculate_diagram_SVV_t9g8n38_VUU
Decay_amplitude_SVV calculate_diagram_SVV_t9g8n38_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpU5U6V4, const std::complex< double > &CpcU6cU5V2, double scale)
Evaluates T9G8N38 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3800
flexiblesusy::calculate_diagram_SVV_t1g3n3_UUU
Decay_amplitude_SVV calculate_diagram_SVV_t1g3n3_UUU(double mext1, double mext2, double mext3, double mLU4, double mLU5, double mLU6, const std::complex< double > &CpS1cU4cU5, const std::complex< double > &CpU5U6V3, const std::complex< double > &CpcU6U4V2, double scale)
Evaluates T1G3N3 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2600
flexiblesusy::calculate_diagram_SFF_t5g10n22_VVV
Decay_amplitude_SFF calculate_diagram_SFF_t5g10n22_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpF2F3cV4PL, const std::complex< double > &CpF2F3cV4PR, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T5G10N22 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7455
flexiblesusy::calculate_diagram_SVV_t5g2n18_SV
Decay_amplitude_SVV calculate_diagram_SVV_t5g2n18_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS1S4cV5V5, double scale, double finite)
Evaluates T5G2N18 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3345
flexiblesusy::calculate_diagram_SFF_t5g8n20_VUU
Decay_amplitude_SFF calculate_diagram_SFF_t5g8n20_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpF2F3cV4PL, const std::complex< double > &CpF2F3cV4PR, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpU5U6V4, double scale)
Evaluates T5G8N20 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7353
flexiblesusy::calculate_diagram_SSS_t1g4n4_SSV
Decay_amplitude_SSS calculate_diagram_SSS_t1g4n4_SSV(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS2S4cV6, const std::complex< double > &CpS3S5V6, double scale)
Evaluates T1G4N4 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:218
flexiblesusy::calculate_diagram_SVV_t10g9n49_VSV
Decay_amplitude_SVV calculate_diagram_SVV_t10g9n49_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS5V4V6, const std::complex< double > &CpV2V3cV4, double scale)
Evaluates T10G9N49 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4303
flexiblesusy::calculate_diagram_SVV_t10g7n47_VSS
Decay_amplitude_SVV calculate_diagram_SVV_t10g7n47_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS5S6V4, const std::complex< double > &CpV2V3cV4, double scale)
Evaluates T10G7N47 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4213
flexiblesusy::calculate_diagram_SVV_t10g3n43_SUU
Decay_amplitude_SVV calculate_diagram_SVV_t10g3n43_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T10G3N43 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4029
flexiblesusy::calculate_diagram_SFF_t1g4n4_SVF
Decay_amplitude_SFF calculate_diagram_SFF_t1g4n4_SVF(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLF6, const std::complex< double > &CpF2cF6S4PL, const std::complex< double > &CpF2cF6S4PR, const std::complex< double > &CpF6F3V5PL, const std::complex< double > &CpF6F3V5PR, const std::complex< double > &CpS1cS4cV5, double scale)
Evaluates T1G4N4 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6498
flexiblesusy::calculate_diagram_SSS_t6g1n19_SS
Decay_amplitude_SSS calculate_diagram_SSS_t6g1n19_SS(double mext1, double mext2, double mext3, double mLS4, double mLS5, const std::complex< double > &CpS2cS4cS5, const std::complex< double > &CpS1S3S4S5, double scale)
Evaluates T6G1N19 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:875
flexiblesusy::calculate_diagram_SVV_t10g1n41_SFF
Decay_amplitude_SVV calculate_diagram_SVV_t10g1n41_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpcS4V2V3, double scale)
Evaluates T10G1N41 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3938
flexiblesusy::calculate_diagram_SSV_t1g10n10_VVV
Decay_amplitude_SSV calculate_diagram_SSV_t1g10n10_VVV(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpS2V4cV6, const std::complex< double > &CpV3V5V6, double scale)
Evaluates T1G10N10 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4848
flexiblesusy::calculate_diagram_SFF_t1g2n2_SSF
Decay_amplitude_SFF calculate_diagram_SFF_t1g2n2_SSF(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLF6, const std::complex< double > &CpF2cF6S4PL, const std::complex< double > &CpF2cF6S4PR, const std::complex< double > &CpF6F3S5PL, const std::complex< double > &CpF6F3S5PR, const std::complex< double > &CpS1cS4cS5, double scale)
Evaluates T1G2N2 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6371
flexiblesusy::calculate_diagram_SSS_t4g2n16_VV
Decay_amplitude_SSS calculate_diagram_SSS_t4g2n16_VV(double mext1, double mext2, double mext3, double mLV4, double mLV5, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpS2S3V4V5, double scale, double finite)
Evaluates T4G2N16 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:758
flexiblesusy::calculate_diagram_SSV_t9g6n36_VFF
Decay_amplitude_SSV calculate_diagram_SSV_t9g6n36_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S2PL, const std::complex< double > &CpcF6cF5S2PR, const std::complex< double > &CpS1V3cV4, double scale)
Evaluates T9G6N36 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5638
flexiblesusy::calculate_diagram_SVV_t7g1n20_SV
Decay_amplitude_SVV calculate_diagram_SVV_t7g1n20_SV(double mext1, double mext2, double mext3, double mLS4, double mLV5, const std::complex< double > &CpcS4V3cV5, const std::complex< double > &CpS1S4V2V5, double scale)
Evaluates T7G1N20 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3422
flexiblesusy::calculate_diagram_SSS_t9g2n34_SSS
Decay_amplitude_SSS calculate_diagram_SSS_t9g2n34_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2cS5cS6, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T9G2N34 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1533
flexiblesusy::calculate_diagram_SVV_t10g6n46_VFF
Decay_amplitude_SVV calculate_diagram_SVV_t10g6n46_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpV2V3cV4, double scale)
Evaluates T10G6N46 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4165
flexiblesusy::calculate_diagram_SSV_t1g4n4_SSV
Decay_amplitude_SSV calculate_diagram_SSV_t1g4n4_SSV(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS2S4cV6, const std::complex< double > &CpS5V3V6, double scale)
Evaluates T1G4N4 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4553
flexiblesusy::Sqr
constexpr std::complex< T > Sqr(const std::complex< T > &a) noexcept
Definition wrappers.hpp:633
flexiblesusy::calculate_diagram_SFF_t5g5n17_SVV
Decay_amplitude_SFF calculate_diagram_SFF_t5g5n17_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T5G5N17 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7195
flexiblesusy::calculate_diagram_SSV_t8g6n26_VFF
Decay_amplitude_SSV calculate_diagram_SSV_t8g6n26_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpcF6cF5V3PL, const std::complex< double > &CpcF6cF5V3PR, const std::complex< double > &CpS1S2cV4, double scale)
Evaluates T8G6N26 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5221
flexiblesusy::calculate_diagram_SSV_t9g8n38_VUU
Decay_amplitude_SSV calculate_diagram_SSV_t9g8n38_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpS2cU6cU5, const std::complex< double > &CpU5U6V4, double scale)
Evaluates T9G8N38 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5726
flexiblesusy::calculate_diagram_SSV_t5g2n17_SV
Decay_amplitude_SSV calculate_diagram_SSV_t5g2n17_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS1S4cV5V5, double scale, double finite)
Evaluates T5G2N17 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5133
flexiblesusy::calculate_diagram_SFF_t5g1n13_SFF
Decay_amplitude_SFF calculate_diagram_SFF_t5g1n13_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S1PL, const std ::complex< double > &CpcF6cF5S1PR, double scale)
Evaluates T5G1N13 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6995
flexiblesusy::calculate_diagram_SVV_t1g10n10_VVV
Decay_amplitude_SVV calculate_diagram_SVV_t1g10n10_VVV(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpV2V4cV6, const std::complex< double > &CpV3V5V6, double scale, double finite)
Evaluates T1G10N10 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2989
flexiblesusy::calculate_diagram_SVV_t6g1n19_SV
Decay_amplitude_SVV calculate_diagram_SVV_t6g1n19_SV(double mext1, double mext2, double mext3, double mLS4, double mLV5, const std::complex< double > &CpcS4V2cV5, const std::complex< double > &CpS1S4V3V5, double scale)
Evaluates T6G1N19 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3384
flexiblesusy::calculate_diagram_SSV_t3g2n14_SV
Decay_amplitude_SSV calculate_diagram_SSV_t3g2n14_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2S4cV5V5, double scale, double finite)
Evaluates T3G2N14 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5014
flexiblesusy::calculate_diagram_SFF_t5g7n19_VSS
Decay_amplitude_SFF calculate_diagram_SFF_t5g7n19_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpF2F3cV4PL, const std::complex< double > &CpF2F3cV4PR, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T5G7N19 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7303
flexiblesusy::calculate_diagram_SSV_t9g1n31_SFF
Decay_amplitude_SSV calculate_diagram_SSV_t9g1n31_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S2PL, const std::complex< double > &CpcF6cF5S2PR, const std::complex< double > &CpS1cS4V3, double scale)
Evaluates T9G1N31 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5413
flexiblesusy::calculate_diagram_SSS_t1g2n2_SSS
Decay_amplitude_SSS calculate_diagram_SSS_t1g2n2_SSS(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS2S4cS6, const std::complex< double > &CpS3S5S6, double scale)
Evaluates T1G2N2 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:134
flexiblesusy::calculate_diagram_SVV_t1g4n4_SSV
Decay_amplitude_SVV calculate_diagram_SVV_t1g4n4_SSV(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS4V2cV6, const std::complex< double > &CpS5V3V6, double scale)
Evaluates T1G4N4 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2653
flexiblesusy::calculate_diagram_SSS_t1g9n9_VVS
Decay_amplitude_SSS calculate_diagram_SSS_t1g9n9_VVS(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLS6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpS2cS6V4, const std::complex< double > &CpS3S6V5, double scale)
Evaluates T1G9N9 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:473
flexiblesusy::calculate_diagram_SSS_t8g9n31_VSV
Decay_amplitude_SSS calculate_diagram_SSS_t8g9n31_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpS3cS5cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T8G9N31 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1393
flexiblesusy::calculate_diagram_SSV_t2g1n11_VS
Decay_amplitude_SSV calculate_diagram_SSV_t2g1n11_VS(double mext1, double mext2, double mext3, double mIV4, double mLS5, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpcS5S5V3V4, double scale)
Evaluates T2G1N11 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4890
flexiblesusy::calculate_diagram_SFF_t5g4n16_SSV
Decay_amplitude_SFF calculate_diagram_SFF_t5g4n16_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T5G4N16 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7143
flexiblesusy::calculate_diagram_SVV_t4g1n15_SS
Decay_amplitude_SVV calculate_diagram_SVV_t4g1n15_SS(double mext1, double mext2, double mext3, double mLS4, double mLS5, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS4S5V2V3, double scale)
Evaluates T4G1N15 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3223
flexiblesusy::calculate_diagram_SVV_t9g9n39_VSV
Decay_amplitude_SVV calculate_diagram_SVV_t9g9n39_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpcS5V2cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T9G9N39 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3841
flexiblesusy::calculate_diagram_SSV_t9g2n32_SSS
Decay_amplitude_SSV calculate_diagram_SSV_t9g2n32_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2cS5cS6, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T9G2N32 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5463
flexiblesusy::calculate_diagram_SSV_t1g6n6_VSS
Decay_amplitude_SSV calculate_diagram_SSV_t1g6n6_VSS(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS2cS6V4, const std::complex< double > &CpS5S6V3, double scale)
Evaluates T1G6N6 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4643
flexiblesusy::calculate_diagram_SSV_t8g9n29_VSV
Decay_amplitude_SSV calculate_diagram_SSV_t8g9n29_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpcS5V3cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T8G9N29 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5316
flexiblesusy::calculate_diagram_SVV_t1g7n7_SVV
Decay_amplitude_SVV calculate_diagram_SVV_t1g7n7_SVV(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLV6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS4V2cV6, const std::complex< double > &CpV3V5V6, double scale)
Evaluates T1G7N7 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2812
flexiblesusy::calculate_diagram_SSV_t10g2n42_SSS
Decay_amplitude_SSV calculate_diagram_SSV_t10g2n42_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T10G2N42 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5906
flexiblesusy::calculate_diagram_SSV_t6g1n18_SV
Decay_amplitude_SSV calculate_diagram_SSV_t6g1n18_SV(double mext1, double mext2, double mext3, double mLS4, double mLV5, const std::complex< double > &CpS2cS4cV5, const std::complex< double > &CpS1S4V3V5, double scale)
Evaluates T6G1N18 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5173
flexiblesusy::calculate_diagram_SVV_t10g5n45_SVV
Decay_amplitude_SVV calculate_diagram_SVV_t10g5n45_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T10G5N45 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4118
flexiblesusy::calculate_diagram_SVV_t5g1n17_SS
Decay_amplitude_SVV calculate_diagram_SVV_t5g1n17_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpcS4V2V3, const std::complex< double > &CpS1S4cS5S5, double scale)
Evaluates T5G1N17 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3306
flexiblesusy::calculate_diagram_SSV_t10g1n41_SFF
Decay_amplitude_SSV calculate_diagram_SSV_t10g1n41_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpS2cS4V3, double scale)
Evaluates T10G1N41 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5856
flexiblesusy::calculate_diagram_SVV_t8g10n30_VVV
Decay_amplitude_SVV calculate_diagram_SVV_t8g10n30_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpV3cV5cV6, const std::complex< double > &CpV4V5V6, double scale, double finite)
Evaluates T8G10N30 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3649
flexiblesusy::calculate_diagram_SSS_t2g1n11_SS
Decay_amplitude_SSS calculate_diagram_SSS_t2g1n11_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3S4cS5S5, double scale)
Evaluates T2G1N11 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:564
flexiblesusy::calculate_diagram_SVV_t4g2n16_VV
Decay_amplitude_SVV calculate_diagram_SVV_t4g2n16_VV(double mext1, double mext2, double mext3, double mLV4, double mLV5, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpV2V3V4V51, const std::complex< double > &CpV2V3V4V52, const std::complex< double > &CpV2V3V4V53, double scale, double finite)
Evaluates T4G2N16 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3266
flexiblesusy::calculate_diagram_SFF_t1g6n6_VVF
Decay_amplitude_SFF calculate_diagram_SFF_t1g6n6_VVF(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLF6, const std::complex< double > &CpF2cF6V4PL, const std::complex< double > &CpF2cF6V4PR, const std::complex< double > &CpF6F3V5PL, const std::complex< double > &CpF6F3V5PR, const std::complex< double > &CpS1cV4cV5, double scale)
Evaluates T1G6N6 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6635
flexiblesusy::calculate_diagram_SSV_t1g1n1_FFF
Decay_amplitude_SSV calculate_diagram_SSV_t1g1n1_FFF(double mext1, double mext2, double mext3, double mLF4, double mLF5, double mLF6, const std::complex< double > &CpcF4cF5S1PL, const std::complex< double > &CpcF4cF5S1PR, const std::complex< double > &CpF5F6V3PL, const std::complex< double > &CpF5F6V3PR, const std::complex< double > &CpcF6F4S2PL, const std::complex< double > &CpcF6F4S2PR, double scale)
Evaluates T1G1N1 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4398
flexiblesusy::calculate_diagram_SSV_t1g2n2_SSS
Decay_amplitude_SSV calculate_diagram_SSV_t1g2n2_SSS(double mext1, double mext2, double mext3, double mLS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS4cS5, const std::complex< double > &CpS2S4cS6, const std::complex< double > &CpS5S6V3, double scale)
Evaluates T1G2N2 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4465
flexiblesusy::calculate_diagram_SVV_t1g5n5_SVS
Decay_amplitude_SVV calculate_diagram_SVV_t1g5n5_SVS(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLS6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS4cS6V2, const std::complex< double > &CpS6V3V5, double scale)
Evaluates T1G5N5 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2696
flexiblesusy::calculate_diagram_SSV_t10g6n46_VFF
Decay_amplitude_SSV calculate_diagram_SSV_t10g6n46_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpS2V3cV4, double scale)
Evaluates T10G6N46 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6081
flexiblesusy::calculate_diagram_SVV_t8g9n29_VSV
Decay_amplitude_SVV calculate_diagram_SVV_t8g9n29_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpcS5V3cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T8G9N29 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3604
flexiblesusy::calculate_diagram_SSS_t9g3n35_SUU
Decay_amplitude_SSS calculate_diagram_SSS_t9g3n35_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2cU6cU5, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T9G3N35 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1574
flexiblesusy::calculate_diagram_SFF_t5g6n18_VFF
Decay_amplitude_SFF calculate_diagram_SFF_t5g6n18_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF2F3cV4PL, const std::complex< double > &CpF2F3cV4PR, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S1PL, const std ::complex< double > &CpcF6cF5S1PR, double scale)
Evaluates T5G6N18 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7248
flexiblesusy::calculate_diagram_SSS_t3g2n14_SV
Decay_amplitude_SSS calculate_diagram_SSS_t3g2n14_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2S4cV5V5, double scale, double finite)
Evaluates T3G2N14 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:681
flexiblesusy::calculate_diagram_SSS_t10g10n52_VVV
Decay_amplitude_SSS calculate_diagram_SSS_t10g10n52_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpS2S3cV4, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T10G10N52 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2338
flexiblesusy::calculate_diagram_SSS_t9g10n42_VVV
Decay_amplitude_SSS calculate_diagram_SSS_t9g10n42_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1S3cV4, const std::complex< double > &CpS2cV5cV6, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T9G10N42 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1888
flexiblesusy::calculate_diagram_SSV_t10g3n43_SUU
Decay_amplitude_SSV calculate_diagram_SSV_t10g3n43_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T10G3N43 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5947
flexiblesusy::calculate_diagram_SVV_t1g1n1_FFF
Decay_amplitude_SVV calculate_diagram_SVV_t1g1n1_FFF(double mext1, double mext2, double mext3, double mLF4, double mLF5, double mLF6, const std::complex< double > &CpcF4cF5S1PL, const std::complex< double > &CpcF4cF5S1PR, const std::complex< double > &CpF5F6V3PL, const std::complex< double > &CpF5F6V3PR, const std::complex< double > &CpcF6F4V2PL, const std::complex< double > &CpcF6F4V2PR, double scale)
Evaluates T1G1N1 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2388
flexiblesusy::calculate_diagram_SSS_t10g2n44_SSS
Decay_amplitude_SSS calculate_diagram_SSS_t10g2n44_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T10G2N44 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1983
flexiblesusy::calculate_diagram_SSV_t1g7n7_SVV
Decay_amplitude_SSV calculate_diagram_SSV_t1g7n7_SVV(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLV6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS2S4cV6, const std::complex< double > &CpV3V5V6, double scale)
Evaluates T1G7N7 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4700
flexiblesusy::calculate_diagram_SSS_t8g4n26_SSV
Decay_amplitude_SSS calculate_diagram_SSS_t8g4n26_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3cS5cV6, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T8G4N26 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1166
flexiblesusy::calculate_diagram_SSS_t9g8n40_VUU
Decay_amplitude_SSS calculate_diagram_SSS_t9g8n40_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1S3cV4, const std::complex< double > &CpS2cU6cU5, const std::complex< double > &CpU5U6V41, const std::complex< double > &CpU5U6V42, double scale)
Evaluates T9G8N40 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1798
flexiblesusy::calculate_diagram_SSS_t9g7n39_VSS
Decay_amplitude_SSS calculate_diagram_SSS_t9g7n39_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1S3cV4, const std::complex< double > &CpS2cS5cS6, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T9G7N39 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1754
flexiblesusy::calculate_diagram_SSS_t5g2n18_SV
Decay_amplitude_SSS calculate_diagram_SSS_t5g2n18_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS1S4cV5V5, double scale, double finite)
Evaluates T5G2N18 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:836
flexiblesusy::calculate_diagram_SSS_t9g6n38_VFF
Decay_amplitude_SSS calculate_diagram_SSS_t9g6n38_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S2PL, const std::complex< double > &CpcF6cF5S2PR, const std::complex< double > &CpS1S3cV4, double scale)
Evaluates T9G6N38 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1708
flexiblesusy::calculate_diagram_SSV_t9g7n37_VSS
Decay_amplitude_SSV calculate_diagram_SSV_t9g7n37_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpS2cS5cS6, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T9G7N37 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5684
flexiblesusy::calculate_diagram_SFF_t1g1n1_FFS
Decay_amplitude_SFF calculate_diagram_SFF_t1g1n1_FFS(double mext1, double mext2, double mext3, double mLF4, double mLF5, double mLS6, const std::complex< double > &CpF2F4cS6PL, const std::complex< double > &CpF2F4cS6PR, const std::complex< double > &CpcF4cF5S1PL, const std::complex< double > &CpcF4cF5S1PR, const std::complex< double > &CpF5F3S6PL, const std ::complex< double > &CpF5F3S6PR, double scale)
Evaluates T1G1N1 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6300
flexiblesusy::calculate_diagram_SSS_t2g2n12_SV
Decay_amplitude_SSS calculate_diagram_SSS_t2g2n12_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3S4cV5V5, double scale, double finite)
Evaluates T2G2N12 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:603
flexiblesusy::calculate_diagram_SSS_t1g1n1_FFF
Decay_amplitude_SSS calculate_diagram_SSS_t1g1n1_FFF(double mext1, double mext2, double mext3, double mLF4, double mLF5, double mLF6, const std::complex< double > &CpcF4cF5S1PL, const std::complex< double > &CpcF4cF5S1PR, const std::complex< double > &CpF5F6S3PL, const std::complex< double > &CpF5F6S3PR, const std::complex< double > &CpcF6F4S2PL, const std::complex< double > &CpcF6F4S2PR, double scale)
Evaluates T1G1N1 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:51
flexiblesusy::calculate_diagram_SVV_t8g6n26_VFF
Decay_amplitude_SVV calculate_diagram_SVV_t8g6n26_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpcF6cF5V3PL, const std::complex< double > &CpcF6cF5V3PR, const std::complex< double > &CpS1V2cV4, double scale)
Evaluates T8G6N26 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3468
flexiblesusy::calculate_diagram_SVV_t1g8n8_VSV
Decay_amplitude_SVV calculate_diagram_SVV_t1g8n8_VSV(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS5V3V6, const std::complex< double > &CpV2V4cV6, double scale)
Evaluates T1G8N8 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2877
flexiblesusy::calculate_diagram_SSS_t10g9n51_VSV
Decay_amplitude_SSS calculate_diagram_SSS_t10g9n51_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS2S3cV4, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T10G9N51 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2293
flexiblesusy::calculate_diagram_SSS_t8g5n27_SVV
Decay_amplitude_SSS calculate_diagram_SSS_t8g5n27_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3cV5cV6, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T8G5N27 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1213
flexiblesusy::calculate_diagram_SVV_t1g9n9_VVS
Decay_amplitude_SVV calculate_diagram_SVV_t1g9n9_VVS(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLS6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpcS6V2V4, const std::complex< double > &CpS6V3V5, double scale)
Evaluates T1G9N9 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2943
flexiblesusy::calculate_diagram_SFF_t3g1n9_FFS
Decay_amplitude_SFF calculate_diagram_SFF_t3g1n9_FFS(double mext1, double mext2, double mext3, double mIF4, double mLF5, double mLS6, const std::complex< double > &CpF2cF4S1PL, const std::complex< double > &CpF2cF4S1PR, const std::complex< double > &CpF4F5S6PL, const std::complex< double > &CpF4F5S6PR, const std::complex< double > &CpcF5F3cS6PL, const std ::complex< double > &CpcF5F3cS6PR, double scale)
Evaluates T3G1N9 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6771
flexiblesusy::calculate_diagram_SSV_t9g5n35_SVV
Decay_amplitude_SSV calculate_diagram_SSV_t9g5n35_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2cV5cV6, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T9G5N35 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5593
flexiblesusy::calculate_diagram_SFF_t5g9n21_VSV
Decay_amplitude_SFF calculate_diagram_SFF_t5g9n21_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpF2F3cV4PL, const std::complex< double > &CpF2F3cV4PR, const std::complex< double > &CpS1cS5cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T5G9N21 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:7403
flexiblesusy::calculate_diagram_SVV_t1g6n6_VSS
Decay_amplitude_SVV calculate_diagram_SVV_t1g6n6_VSS(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS5S6V3, const std::complex< double > &CpcS6V2V4, double scale)
Evaluates T1G6N6 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:2750
flexiblesusy::calculate_diagram_SVV_t10g10n50_VVV
Decay_amplitude_SVV calculate_diagram_SVV_t10g10n50_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1cV5cV6, const std::complex< double > &CpV2V3cV4, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T10G10N50 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:4350
flexiblesusy::calculate_diagram_SFF_t1g3n3_FFV
Decay_amplitude_SFF calculate_diagram_SFF_t1g3n3_FFV(double mext1, double mext2, double mext3, double mLF4, double mLF5, double mLV6, const std::complex< double > &CpF2F4cV6PR, const std::complex< double > &CpF2F4cV6PL, const std::complex< double > &CpcF4cF5S1PL, const std::complex< double > &CpcF4cF5S1PR, const std::complex< double > &CpF5F3V6PL, const std ::complex< double > &CpF5F3V6PR, double scale, double finite)
Evaluates T1G3N3 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6427
flexiblesusy::calculate_diagram_SSS_t7g2n22_VV
Decay_amplitude_SSS calculate_diagram_SSS_t7g2n22_VV(double mext1, double mext2, double mext3, double mLV4, double mLV5, const std::complex< double > &CpS3cV4cV5, const std::complex< double > &CpS1S2V4V5, double scale, double finite)
Evaluates T7G2N22 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:990
flexiblesusy::calculate_diagram_SSV_t9g9n39_VSV
Decay_amplitude_SSV calculate_diagram_SSV_t9g9n39_VSV(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLV6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpS2cS5cV6, const std::complex< double > &CpS5V4V6, double scale)
Evaluates T9G9N39 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5768
flexiblesusy::calculate_diagram_SFF_t4g2n12_FFV
Decay_amplitude_SFF calculate_diagram_SFF_t4g2n12_FFV(double mext1, double mext2, double mext3, double mIF4, double mLF5, double mLV6, const std::complex< double > &CpcF4F3S1PL, const std::complex< double > &CpcF4F3S1PR, const std::complex< double > &CpF2cF5cV6PL, const std::complex< double > &CpF2cF5cV6PR, const std::complex< double > &CpF5F4V6PL, const std ::complex< double > &CpF5F4V6PR, double scale, double finite)
Evaluates T4G2N12 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6940
flexiblesusy::calculate_diagram_SSV_t1g9n9_VVS
Decay_amplitude_SSV calculate_diagram_SSV_t1g9n9_VVS(double mext1, double mext2, double mext3, double mLV4, double mLV5, double mLS6, const std::complex< double > &CpS1cV4cV5, const std::complex< double > &CpS2cS6V4, const std::complex< double > &CpS6V3V5, double scale)
Evaluates T1G9N9 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4802
flexiblesusy::calculate_diagram_SSS_t10g8n50_VUU
Decay_amplitude_SSS calculate_diagram_SSS_t10g8n50_VUU(double mext1, double mext2, double mext3, double mIV4, double mLU5, double mLU6, const std::complex< double > &CpS1cU6cU5, const std::complex< double > &CpS2S3cV4, const std::complex< double > &CpU5U6V41, const std::complex< double > &CpU5U6V42, double scale)
Evaluates T10G8N50 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2248
flexiblesusy::calculate_diagram_SSS_t8g10n32_VVV
Decay_amplitude_SSS calculate_diagram_SSS_t8g10n32_VVV(double mext1, double mext2, double mext3, double mIV4, double mLV5, double mLV6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpS3cV5cV6, const std::complex< double > &CpV4V5V6, double scale)
Evaluates T8G10N32 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1438
flexiblesusy::calculate_diagram_SSS_t9g1n33_SFF
Decay_amplitude_SSS calculate_diagram_SSS_t9g1n33_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S2PL, const std::complex< double > &CpcF6cF5S2PR, const std::complex< double > &CpS1S3cS4, double scale)
Evaluates T9G1N33 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1483
flexiblesusy::calculate_diagram_SVV_t9g7n37_VSS
Decay_amplitude_SVV calculate_diagram_SVV_t9g7n37_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpcS5cS6V2, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T9G7N37 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3759
flexiblesusy::calculate_diagram_SFF_t4g1n11_FFS
Decay_amplitude_SFF calculate_diagram_SFF_t4g1n11_FFS(double mext1, double mext2, double mext3, double mIF4, double mLF5, double mLS6, const std::complex< double > &CpcF4F3S1PL, const std::complex< double > &CpcF4F3S1PR, const std::complex< double > &CpF2cF5cS6PL, const std::complex< double > &CpF2cF5cS6PR, const std::complex< double > &CpF5F4S6PL, const std ::complex< double > &CpF5F4S6PR, double scale)
Evaluates T4G1N11 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6883
flexiblesusy::calculate_diagram_SVV_t8g7n27_VSS
Decay_amplitude_SVV calculate_diagram_SVV_t8g7n27_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1V2cV4, const std::complex< double > &CpcS5cS6V3, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T8G7N27 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3522
flexiblesusy::calculate_diagram_SFF_t2g2n8_SV
Decay_amplitude_SFF calculate_diagram_SFF_t2g2n8_SV(double mext1, double mext2, double mext3, double mIS4, double mLV5, const std::complex< double > &CpF2F3cS4PL, const std::complex< double > &CpF2F3cS4PR, const std::complex< double > &CpS1S4cV5V5, double scale, double finite)
Evaluates T2G2N8 diagram for process S -> FF.
Definition one_loop_decay_diagrams.cpp:6725
flexiblesusy::calculate_diagram_SSV_t9g4n34_SSV
Decay_amplitude_SSV calculate_diagram_SSV_t9g4n34_SSV(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLV6, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2cS5cV6, const std::complex< double > &CpS4S5V6, double scale)
Evaluates T9G4N34 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5546
flexiblesusy::calculate_diagram_SSS_t8g6n28_VFF
Decay_amplitude_SSS calculate_diagram_SSS_t8g6n28_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S3PL, const std::complex< double > &CpcF6cF5S3PR, const std::complex< double > &CpS1S2cV4, double scale)
Evaluates T8G6N28 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1258
flexiblesusy::calculate_diagram_SSS_t8g7n29_VSS
Decay_amplitude_SSS calculate_diagram_SSS_t8g7n29_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpS3cS5cS6, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T8G7N29 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1304
flexiblesusy::Cube
constexpr T Cube(T a) noexcept
Definition wrappers.hpp:181
flexiblesusy::oneOver16PiSqr
static constexpr double oneOver16PiSqr
Definition wrappers.hpp:46
flexiblesusy::calculate_diagram_SSV_t5g1n16_SS
Decay_amplitude_SSV calculate_diagram_SSV_t5g1n16_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpS2cS4V3, const std::complex< double > &CpS1S4cS5S5, double scale)
Evaluates T5G1N16 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5094
flexiblesusy::calculate_diagram_SSS_t1g7n7_SVV
Decay_amplitude_SSS calculate_diagram_SSS_t1g7n7_SVV(double mext1, double mext2, double mext3, double mLS4, double mLV5, double mLV6, const std::complex< double > &CpS1cS4cV5, const std::complex< double > &CpS2S4cV6, const std::complex< double > &CpS3V5V6, double scale)
Evaluates T1G7N7 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:371
flexiblesusy::calculate_diagram_SVV_t3g2n14_VV
Decay_amplitude_SVV calculate_diagram_SVV_t3g2n14_VV(double mext1, double mext2, double mext3, double mIV4, double mLV5, const std::complex< double > &CpS1V3cV4, const std::complex< double > &CpV2V4cV5V51, const std::complex< double > &CpV2V4cV5V52, const std::complex< double > &CpV2V4cV5V53, double scale, double finite)
Evaluates T3G2N14 diagram for process S -> VV.
Definition one_loop_decay_diagrams.cpp:3182
flexiblesusy::calculate_diagram_SSS_t10g1n43_SFF
Decay_amplitude_SSS calculate_diagram_SSS_t10g1n43_SFF(double mext1, double mext2, double mext3, double mIS4, double mLF5, double mLF6, const std::complex< double > &CpF5F6S4PL, const std::complex< double > &CpF5F6S4PR, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpS2S3cS4, double scale)
Evaluates T10G1N43 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1933
flexiblesusy::calculate_diagram_SSS_t10g6n48_VFF
Decay_amplitude_SSS calculate_diagram_SSS_t10g6n48_VFF(double mext1, double mext2, double mext3, double mIV4, double mLF5, double mLF6, const std::complex< double > &CpF5F6V4PR, const std::complex< double > &CpF5F6V4PL, const std::complex< double > &CpcF6cF5S1PL, const std::complex< double > &CpcF6cF5S1PR, const std::complex< double > &CpS2S3cV4, double scale)
Evaluates T10G6N48 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:2158
flexiblesusy::calculate_diagram_SSV_t3g1n13_SS
Decay_amplitude_SSV calculate_diagram_SSV_t3g1n13_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2S4cS5S5, double scale)
Evaluates T3G1N13 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:4975
flexiblesusy::calculate_diagram_SSS_t8g3n25_SUU
Decay_amplitude_SSS calculate_diagram_SSS_t8g3n25_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3cU6cU5, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T8G3N25 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1124
flexiblesusy::calculate_diagram_SSS_t3g1n13_SS
Decay_amplitude_SSS calculate_diagram_SSS_t3g1n13_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2S4cS5S5, double scale)
Evaluates T3G1N13 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:642
flexiblesusy::calculate_diagram_SSV_t9g3n33_SUU
Decay_amplitude_SSV calculate_diagram_SSV_t9g3n33_SUU(double mext1, double mext2, double mext3, double mIS4, double mLU5, double mLU6, const std::complex< double > &CpS1cS4V3, const std::complex< double > &CpS2cU6cU5, const std::complex< double > &CpS4U5U6, double scale)
Evaluates T9G3N33 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5504
flexiblesusy::calculate_diagram_SSV_t8g7n27_VSS
Decay_amplitude_SSV calculate_diagram_SSV_t8g7n27_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1S2cV4, const std::complex< double > &CpcS5cS6V3, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T8G7N27 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:5275
flexiblesusy::calculate_diagram_SSS_t8g2n24_SSS
Decay_amplitude_SSS calculate_diagram_SSS_t8g2n24_SSS(double mext1, double mext2, double mext3, double mIS4, double mLS5, double mLS6, const std::complex< double > &CpS1S2cS4, const std::complex< double > &CpS3cS5cS6, const std::complex< double > &CpS4S5S6, double scale)
Evaluates T8G2N24 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1083
flexiblesusy::calculate_diagram_SSS_t9g5n37_SVV
Decay_amplitude_SSS calculate_diagram_SSS_t9g5n37_SVV(double mext1, double mext2, double mext3, double mIS4, double mLV5, double mLV6, const std::complex< double > &CpS1S3cS4, const std::complex< double > &CpS2cV5cV6, const std::complex< double > &CpS4V5V6, double scale, double finite)
Evaluates T9G5N37 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:1663
flexiblesusy::calculate_diagram_SSS_t5g1n17_SS
Decay_amplitude_SSS calculate_diagram_SSS_t5g1n17_SS(double mext1, double mext2, double mext3, double mIS4, double mLS5, const std::complex< double > &CpS2S3cS4, const std::complex< double > &CpS1S4cS5S5, double scale)
Evaluates T5G1N17 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:797
flexiblesusy::calculate_diagram_SSS_t1g6n6_VSS
Decay_amplitude_SSS calculate_diagram_SSS_t1g6n6_VSS(double mext1, double mext2, double mext3, double mLV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cV4, const std::complex< double > &CpS2cS6V4, const std::complex< double > &CpS3S5S6, double scale)
Evaluates T1G6N6 diagram for process S -> SS.
Definition one_loop_decay_diagrams.cpp:320
flexiblesusy::calculate_diagram_SSV_t10g7n47_VSS
Decay_amplitude_SSV calculate_diagram_SSV_t10g7n47_VSS(double mext1, double mext2, double mext3, double mIV4, double mLS5, double mLS6, const std::complex< double > &CpS1cS5cS6, const std::complex< double > &CpS2V3cV4, const std::complex< double > &CpS5S6V4, double scale)
Evaluates T10G7N47 diagram for process S -> SV.
Definition one_loop_decay_diagrams.cpp:6127
one_loop_decay_diagrams.hpp
flexiblesusy::Decay_amplitude_SFF
generic amplitude for the decay of a scalar into two fermions
Definition decay_amplitudes.hpp:102
flexiblesusy::Decay_amplitude_SFF::form_factor_left
std::complex< double > form_factor_left
Definition decay_amplitudes.hpp:106
flexiblesusy::Decay_amplitude_SFF::m_fermion_1
double m_fermion_1
Definition decay_amplitudes.hpp:104
flexiblesusy::Decay_amplitude_SFF::m_fermion_2
double m_fermion_2
Definition decay_amplitudes.hpp:105
flexiblesusy::Decay_amplitude_SFF::form_factor_right
std::complex< double > form_factor_right
Definition decay_amplitudes.hpp:107
flexiblesusy::Decay_amplitude_SFF::m_decay
double m_decay
Definition decay_amplitudes.hpp:103
flexiblesusy::Decay_amplitude_SSS
generic amplitude for the decay of a scalar into two scalars
Definition decay_amplitudes.hpp:33
flexiblesusy::Decay_amplitude_SSS::m_scalar_1
double m_scalar_1
Definition decay_amplitudes.hpp:35
flexiblesusy::Decay_amplitude_SSS::form_factor
std::complex< double > form_factor
Definition decay_amplitudes.hpp:37
flexiblesusy::Decay_amplitude_SSS::m_scalar_2
double m_scalar_2
Definition decay_amplitudes.hpp:36
flexiblesusy::Decay_amplitude_SSS::m_decay
double m_decay
Definition decay_amplitudes.hpp:34
flexiblesusy::Decay_amplitude_SSV
generic amplitude for the decay of a scalar into a scalar and vector
Definition decay_amplitudes.hpp:52
flexiblesusy::Decay_amplitude_SSV::m_decay
double m_decay
Definition decay_amplitudes.hpp:53
flexiblesusy::Decay_amplitude_SSV::m_vector
double m_vector
Definition decay_amplitudes.hpp:55
flexiblesusy::Decay_amplitude_SSV::form_factor
std::complex< double > form_factor
Definition decay_amplitudes.hpp:57
flexiblesusy::Decay_amplitude_SSV::m_scalar
double m_scalar
Definition decay_amplitudes.hpp:54
flexiblesusy::Decay_amplitude_SVV
generic amplitude for the decay of a scalar into two vectors
Definition decay_amplitudes.hpp:72
flexiblesusy::Decay_amplitude_SVV::form_factor_21
std::complex< double > form_factor_21
Definition decay_amplitudes.hpp:80
flexiblesusy::Decay_amplitude_SVV::form_factor_eps
std::complex< double > form_factor_eps
Definition decay_amplitudes.hpp:82
flexiblesusy::Decay_amplitude_SVV::m_vector_2
double m_vector_2
Definition decay_amplitudes.hpp:75
flexiblesusy::Decay_amplitude_SVV::form_factor_22
std::complex< double > form_factor_22
Definition decay_amplitudes.hpp:81
flexiblesusy::Decay_amplitude_SVV::m_decay
double m_decay
Definition decay_amplitudes.hpp:73
flexiblesusy::Decay_amplitude_SVV::form_factor_11
std::complex< double > form_factor_11
Definition decay_amplitudes.hpp:78
flexiblesusy::Decay_amplitude_SVV::form_factor_12
std::complex< double > form_factor_12
Definition decay_amplitudes.hpp:79
flexiblesusy::Decay_amplitude_SVV::m_vector_1
double m_vector_1
Definition decay_amplitudes.hpp:74
flexiblesusy::Decay_amplitude_SVV::form_factor_g
std::complex< double > form_factor_g
Definition decay_amplitudes.hpp:77
Generated on Sun Apr 6 2025 11:10:37 for FlexibleSUSY by doxygen 1.9.8