Hyperiso 1.0.3
Modular flavour-physics calculations, Wilson coefficients and statistical inference
Loading...
Searching...
No Matches
C1.cpp
Go to the documentation of this file.
1#include <iostream>
2
3// HYPERISO_MARTY_OPERATOR_NORM_ABI: ew-input-normalization-v1
4using namespace csl;
5using namespace mty;
6using namespace std;
7using namespace sm_input;
8
9void defineLibPath(Library &lib) {
10#ifdef MARTY_LIBRARY_PATH
11 lib.addLPath(MARTY_LIBRARY_PATH);
12 lib.addLPath(MARTY_LIBRARY_PATH "/..");
13 lib.addLPath(MARTY_LIBRARY_PATH "/marty");
14 lib.addLPath(MARTY_LIBRARY_PATH "/marty/lha");
15#endif
16#ifdef MARTY_INCLUDE_PATH
17 lib.addIPath(MARTY_INCLUDE_PATH);
18#endif
19}
20
21int calculate_C1(Model &model, gauge::Type gauge) {
22
23 model.getParticle("W")->setGaugeChoice(gauge);
24 model.getParticle("Z")->setGaugeChoice(gauge);
25
26 undefineNumericalValues(); // Allow for HIso to set all the parameters' values
27 mty::option::excludeExternalLegsCorrections = true;
28
29 Expr factorOperator = -GetComplexConjugate(V_cs) * V_cb * pow_s(e_em, 2)
30 / (2 * pow_s(sin_s(theta_W), 2) * pow_s(M_W, 2));
31 FeynOptions opts;
32 opts.setFermionOrder({1, 3, 2, 0});
33 opts.setWilsonOperatorCoefficient(factorOperator);
34
35 auto wil = model.computeWilsonCoefficients(mty::Order::TreeLevel,
36 {Incoming("b"), Outgoing("s"),
37 Outgoing("c"), Outgoing(AntiPart("c"))},
38 opts);
39
40 auto O1 = dimension6Operator(model, wil, DiracCoupling::VL, DiracCoupling::VL, {"C", ColorCoupling::Generator}, {1, 3, 0, 2});
41 Expr C1 = getWilsonCoefficient(wil, O1);
42
43 [[maybe_unused]] int sysres = system("rm -rf libs/C1_SM");
44 mty::Library wilsonLib("C1_SM", "libs");
45 wilsonLib.cleanExistingSources();
46 wilsonLib.addFunction("C1", C1);
47 defineLibPath(wilsonLib);
48 wilsonLib.print();
49
50 return 0;
51}
52
53int main() {
54 SM_Model sm;
55 return calculate_C1(sm, gauge::Type::Feynman);
56}
int calculate_C1(Model &model, gauge::Type gauge)
Definition C1.cpp:21
void defineLibPath(Library &lib)
Definition C1.cpp:9
int main()
Definition C1.cpp:53
Model
Definition BWilson.h:6
Standard Model of particle physics.
Definition sm.h:35
csl::Expr e_em
Definition sm.h:78
csl::Expr V_cb
Definition sm.h:238
csl::Expr V_cs
Definition sm.h:286
csl::Expr theta_W
Definition sm.h:136
void undefineNumericalValues()
csl::Expr M_W
Definition sm.h:106
Definition sm.h:30
Hash specialization for SymbolId<Tag>.
Definition BlockName.h:353