forked from Expander/FlexibleSUSY
/
FlexibleSUSY.m.in
120 lines (97 loc) · 2.87 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
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
FSModelName = "@CLASSNAME@";
FSEigenstates = SARAH`EWSB;
FSDefaultSARAHModel = NMSSM;
FSBVPSolvers = { SemiAnalyticSolver };
(* CNMSSM input parameters *)
MINPAR = {
{2, m12},
{3, TanBeta},
{4, Sign[vS]},
{5, Azero}
};
EXTPAR = {
{61, LambdaInput}
};
FSAuxiliaryParameters = {
{m0Sq, {1}}
};
EWSBOutputParameters = { \[Kappa], vS, m0Sq };
EWSBInitialGuess = {
{m0Sq, LowEnergyConstant[MZ]^2}
};
SUSYScale = Sqrt[Product[M[Su[i]]^(Abs[ZU[i,3]]^2 + Abs[ZU[i,6]]^2), {i,6}]];
SUSYScaleFirstGuess = Sqrt[14 m12^2 - 3 m12 Azero + Azero^2];
SUSYScaleInput = {};
HighScale = g1 == g2;
HighScaleFirstGuess = 2.0 10^16;
HighScaleInput={
{T[Ye], Azero*Ye},
{T[Yd], Azero*Yd},
{T[Yu], Azero*Yu},
{mq2, UNITMATRIX[3] m0Sq},
{ml2, UNITMATRIX[3] m0Sq},
{md2, UNITMATRIX[3] m0Sq},
{mu2, UNITMATRIX[3] m0Sq},
{me2, UNITMATRIX[3] m0Sq},
{mHu2, m0Sq},
{mHd2, m0Sq},
{ms2, m0Sq},
{\[Lambda], LambdaInput},
{T[\[Kappa]], Azero \[Kappa]},
{T[\[Lambda]], Azero LambdaInput},
{MassB, m12},
{MassWB,m12},
{MassG,m12}
};
LowScale = LowEnergyConstant[MZ];
LowScaleFirstGuess = LowEnergyConstant[MZ];
LowScaleInput = {
{Yu, Automatic},
{Yd, Automatic},
{Ye, Automatic},
{vd, 2 MZDRbar / Sqrt[GUTNormalization[g1]^2 g1^2 + g2^2] Cos[ArcTan[TanBeta]]},
{vu, 2 MZDRbar / Sqrt[GUTNormalization[g1]^2 g1^2 + g2^2] Sin[ArcTan[TanBeta]]}
};
InitialGuessAtLowScale = {
{vd, LowEnergyConstant[vev] Cos[ArcTan[TanBeta]]},
{vu, LowEnergyConstant[vev] Sin[ArcTan[TanBeta]]},
{\[Lambda], LambdaInput},
{\[Kappa], 0.1},
{vS, 1000},
{Yu, Automatic},
{Yd, Automatic},
{Ye, Automatic}
};
InitialGuessAtHighScale = {};
UseHiggs2LoopNMSSM = True;
EffectiveMu = \[Lambda] vS / Sqrt[2];
EffectiveMASqr = (T[\[Lambda]] vS / Sqrt[2] + 0.5 \[Lambda] \[Kappa] vS^2) (vu^2 + vd^2) / (vu vd);
PotentialLSPParticles = { Chi, Sv, Su, Sd, Se, Cha, Glu };
DefaultPoleMassPrecision = MediumPrecision;
HighPoleMassPrecision = {hh, Ah, Hpm};
MediumPoleMassPrecision = {};
LowPoleMassPrecision = {};
ExtraSLHAOutputBlocks = {
{FlexibleSUSYOutput, NoScale,
{{0, Hold[HighScale]},
{1, Hold[SUSYScale]},
{2, Hold[LowScale]} } },
{EWSBOutputs, NoScale,
{{1, \[Kappa]},
{2, vS},
{3, m0Sq} } },
{FlexibleSUSYLowEnergy,
{{0, FlexibleSUSYObservable`aMuon} } },
{EFFHIGGSCOUPLINGS, NoScale,
{{1, FlexibleSUSYObservable`CpHiggsPhotonPhoton},
{2, FlexibleSUSYObservable`CpHiggsGluonGluon},
{3, FlexibleSUSYObservable`CpPseudoScalarPhotonPhoton},
{4, FlexibleSUSYObservable`CpPseudoScalarGluonGluon} } },
{NMSSMRUN,
{{1, \[Lambda]},
{2, \[Kappa]},
{3, T[\[Lambda]] / \[Lambda]},
{4, T[\[Kappa]] / \[Kappa]},
{5, \[Lambda] vS / Sqrt[2]},
{10, ms2} } }
};