forked from Expander/FlexibleSUSY
-
Notifications
You must be signed in to change notification settings - Fork 14
/
FlexibleSUSY.m.in
80 lines (64 loc) · 1.77 KB
/
FlexibleSUSY.m.in
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
FSModelName = "@CLASSNAME@";
FSEigenstates = SARAH`EWSB;
FSDefaultSARAHModel = "THDM-II";
OnlyLowEnergyFlexibleSUSY = True;
(* input parameters *)
MINPAR = {
{1, Lambda1IN},
{2, Lambda2IN},
{3, Lambda3IN},
{4, Lambda4IN},
{5, Lambda5IN},
{6, Lambda6IN},
{7, Lambda7IN},
{8, M122IN},
{10, TanBeta}
};
EXTPAR = {
{0, Qin}
};
EWSBOutputParameters = { M112, M222 };
SUSYScale = Qin;
SUSYScaleFirstGuess = Qin;
SUSYScaleInput = {
{Lambda1, Lambda1IN},
{Lambda2, Lambda2IN},
{Lambda3, Lambda3IN},
{Lambda4, Lambda4IN},
{Lambda5, Lambda5IN},
{Lambda6, Lambda6IN},
{Lambda7, Lambda7IN},
{M122 , M122IN}
};
LowScale = LowEnergyConstant[MZ];
LowScaleFirstGuess = LowEnergyConstant[MZ];
LowScaleInput = {
{v1, 2 MZMSbar / Sqrt[GUTNormalization[g1]^2 g1^2 + g2^2] Cos[ArcTan[TanBeta]]},
{v2, 2 MZMSbar / Sqrt[GUTNormalization[g1]^2 g1^2 + g2^2] Sin[ArcTan[TanBeta]]},
{Yu, Automatic},
{Yd, Automatic},
{Ye, Automatic}
};
InitialGuessAtLowScale = {
{v1, LowEnergyConstant[vev] Cos[ArcTan[TanBeta]]},
{v2, LowEnergyConstant[vev] Sin[ArcTan[TanBeta]]},
{Yu, Automatic},
{Yd, Automatic},
{Ye, Automatic}
};
SMParticles = {
Electron, TopQuark, BottomQuark,
VectorP, VectorZ, VectorG, VectorW, Neutrino,
gP, gG, gZ, gWm, gWmC
};
DefaultPoleMassPrecision = MediumPrecision;
HighPoleMassPrecision = {hh, Ah, Hpm};
MediumPoleMassPrecision = {};
LowPoleMassPrecision = {};
ExtraSLHAOutputBlocks = {
{EFFHIGGSCOUPLINGS, NoScale,
{{1, FlexibleSUSYObservable`CpHiggsPhotonPhoton},
{2, FlexibleSUSYObservable`CpHiggsGluonGluon},
{3, FlexibleSUSYObservable`CpPseudoScalarPhotonPhoton},
{4, FlexibleSUSYObservable`CpPseudoScalarGluonGluon} } }
};