BSMCharacterisation: MB.fr

File MB.fr, 66.5 KB (added by Benjamin Fuks, 10 years ago)

Main MB FeynRules file, v1.1

Line 
1(*****************************************************************************)
2(* This is the FeynRules model file for the EFT mass basis *)
3(*****************************************************************************)
4
5(* ************************** *)
6(* ***** Information ***** *)
7(* ************************** *)
8
9M$ModelName = "MB";
10
11M$Information = {
12 Authors -> {"B. Fuks", "K. Mawatari"},
13 Version -> "1.1",
14 Date -> "30.07.2015",
15 Institutions -> {"IPHC Strasbourg / U. Strasbourg", "Vrije Universiteit Brussel"},
16 Emails -> {"benjamin.fuks@iphc.cnrs.fr", "kentarou.mawatari@vub.ac.be"},
17 URLs -> "http://feynrules.irmp.ucl.ac.be/wiki/EFTmassbasis",
18 References -> {"A. Falkwoski, B. Fuks, K. Mawatari, K. Mimasu, F. Riva and V. Sanz, arXiv:1507.xxxxx"}
19};
20
21
22(* ************************** *)
23(* ***** Change log ***** *)
24(* ************************** *)
25
26(* 14.07.2015 v1.0 - release version (based on the Higgs basis note (Jun/14)). *)
27(* 27.07.2015 v1.1 - modifying the flavor structure. *)
28
29
30FeynmanGauge = False;
31
32(* ************************** *)
33(* ** Interaction orders ** *)
34(* ************************** *)
35
36M$InteractionOrderLimit = { {QNP, 2} };
37M$InteractionOrderHierarchy = { {QNP, 1} };
38
39
40(* ************************** *)
41(* ***** Parameters ***** *)
42(* ************************** *)
43M$Parameters = {
44
45 (* Quadratic terms *)
46 dM == { TeX -> "\[Delta]m", ParameterType -> External, Value -> 0.1, BlockName -> MBxmass, OrderBlock -> 1, Description -> "W-mass corrections"},
47
48 (* Lvertex parameters *)
49 RdGLzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLzu[i_,j_]->0.1}, BlockName -> MBxdGLzu, Description -> "Z-u vertex interactions (real part, L)"},
50 IdGLzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLzu[i_,j_]->0.0}, BlockName -> IMMBxdGLzu, Description -> "Z-u vertex interactions (im part, L)" },
51 RdGLzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLzd[i_,j_]->0.1}, BlockName -> MBxdGLzd, Description -> "Z-d vertex interactions (real part, L)"},
52 IdGLzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLzd[i_,j_]->0.0}, BlockName -> IMMBxdGLzd, Description -> "Z-d vertex interactions (im part, L)" },
53 RdGLze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLze[i_,j_]->0.1}, BlockName -> MBxdGLzl, Description -> "Z-l vertex interactions (real part, L)"},
54 IdGLze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLze[i_,j_]->0.0}, BlockName -> IMMBxdGLzl, Description -> "Z-l vertex interactions (im part, L)"},
55 RdGLzv == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLzv[i_,j_]->0.1}, BlockName -> MBxdGLzv, Description -> "Z-v vertex interactions (real part, L)"},
56 IdGLzv == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLzv[i_,j_]->0.0}, BlockName -> IMMBxdGLzv, Description -> "Z-v vertex interactions (im part, L)"},
57 RdGRzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRzu[i_,j_]->0.1}, BlockName -> MBxdGRzu, Description -> "Z-u vertex interactions (real part, R)"},
58 IdGRzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRzu[i_,j_]->0.0}, BlockName -> IMMBxdGRzu, Description -> "Z-u vertex interactions (im part, R)" },
59 RdGRzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRzd[i_,j_]->0.1}, BlockName -> MBxdGRzd, Description -> "Z-d vertex interactions (real part, R)"},
60 IdGRzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRzd[i_,j_]->0.0}, BlockName -> IMMBxdGRzd, Description -> "Z-d vertex interactions (im part, R)" },
61 RdGRze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRze[i_,j_]->0.1}, BlockName -> MBxdGRzl, Description -> "Z-l vertex interactions (real part, R)"},
62 IdGRze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRze[i_,j_]->0.0}, BlockName -> IMMBxdGRzl, Description -> "Z-l vertex interactions (im part, R)"},
63 RdGLwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLwq[i_,j_]->0.1}, BlockName -> MBxdGWLq, Description -> "W-q vertex interactions (real part, L)"},
64 IdGLwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLwq[i_,j_]->0.0}, BlockName -> IMMBxdGWLq, Description -> "W-q vertex interactions (im part, L)" },
65 RdGRwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRwq[i_,j_]->0.1}, BlockName -> MBxdGWRq, Description -> "W-q vertex interactions (real part, R)"},
66 IdGRwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRwq[i_,j_]->0.0}, BlockName -> IMMBxdGWRq, Description -> "W-q vertex interactions (im part, R)" },
67 RdGLwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLwl[i_,j_]->0.1}, BlockName -> MBxdGWLl, Description -> "W-l vertex interactions (real part, L)"},
68 IdGLwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLwl[i_,j_]->0.0}, BlockName -> IMMBxdGWLl, Description -> "W-l vertex interactions (im part, L)" },
69
70 dGLzu == { TeX -> Subsuperscript["\[Delta]g", L, Zu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
71 Value -> {dGLzu[i_,j_]->RdGLzu[i,j] + I IdGLzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-u vertex interactions (L)"},
72 dGLzd == { TeX -> Subsuperscript["\[Delta]g", L, Zd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
73 Value -> {dGLzd[i_,j_]->RdGLzd[i,j] + I IdGLzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-d vertex interactions (L)"},
74 dGLze == { TeX -> Subsuperscript["\[Delta]g", L, Zl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
75 Value -> {dGLze[i_,j_]->RdGLze[i,j] + I IdGLze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-l vertex interactions (L)"},
76 dGLzv == { TeX -> Subsuperscript["\[Delta]g", L, Zv], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
77 Value -> {dGLzv[i_,j_]->RdGLzv[i,j] + I IdGLzv[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-v vertex interactions (L)"},
78 dGRzu == { TeX -> Subsuperscript["\[Delta]g", R, Zu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
79 Value -> {dGRzu[i_,j_]->RdGRzu[i,j] + I IdGRzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-u vertex interactions (R)"},
80 dGRzd == { TeX -> Subsuperscript["\[Delta]g", R, Zd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
81 Value -> {dGRzd[i_,j_]->RdGRzd[i,j] + I IdGRzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-d vertex interactions (R)"},
82 dGRze == { TeX -> Subsuperscript["\[Delta]g", R, Zl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
83 Value -> {dGRze[i_,j_]->RdGRze[i,j] + I IdGRze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-l vertex interactions (R)"},
84 dGLwq == { TeX -> Subsuperscript["\[Delta]g", L, Wq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
85 Value -> {dGLwq[i_,j_]->RdGLwq[i,j] + I IdGLwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "W-q vertex interactions (L)"},
86 dGRwq == { TeX -> Subsuperscript["\[Delta]g", R, Wq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
87 Value -> {dGRwq[i_,j_]->RdGRwq[i,j] + I IdGRwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "W-q vertex interactions (R)"},
88 dGLwl == { TeX -> Subsuperscript["\[Delta]g", L, Wl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
89 Value -> {dGLwl[i_,j_]->RdGLwl[i,j] + I IdGLwl[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "W-l vertex interactions (L)"},
90
91 (* Ldip parameters *)
92 Rdgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdgu[i_,j_]->0.1}, BlockName -> MBxdgu, Description -> "G-u dipole interactions (real part)"},
93 Idgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idgu[i_,j_]->0.0}, BlockName -> IMMBxdgu, Description -> "G-u dipole interactions (im part)" },
94 Rdgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdgd[i_,j_]->0.1}, BlockName -> MBxdgd, Description -> "G-d dipole interactions (real part)"},
95 Idgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idgd[i_,j_]->0.0}, BlockName -> IMMBxdgd, Description -> "G-d dipole interactions (im part)" },
96 Rdau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdau[i_,j_]->0.1}, BlockName -> MBxdau, Description -> "A-u dipole interactions (real part)"},
97 Idau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idau[i_,j_]->0.0}, BlockName -> IMMBxdau, Description -> "A-u dipole interactions (im part)" },
98 Rdad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdad[i_,j_]->0.1}, BlockName -> MBxdad, Description -> "A-d dipole interactions (real part)"},
99 Idad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idad[i_,j_]->0.0}, BlockName -> IMMBxdad, Description -> "A-d dipole interactions (im part)" },
100 Rdae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdae[i_,j_]->0.1}, BlockName -> MBxdae, Description -> "A-e dipole interactions (real part)"},
101 Idae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idae[i_,j_]->0.0}, BlockName -> IMMBxdae, Description -> "A-e dipole interactions (im part)" },
102 Rdzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdzu[i_,j_]->0.1}, BlockName -> MBxdzu, Description -> "Z-u dipole interactions (real part)"},
103 Idzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idzu[i_,j_]->0.0}, BlockName -> IMMBxdzu, Description -> "Z-u dipole interactions (im part)" },
104 Rdzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdzd[i_,j_]->0.1}, BlockName -> MBxdzd, Description -> "Z-d dipole interactions (real part)"},
105 Idzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idzd[i_,j_]->0.0}, BlockName -> IMMBxdzd, Description -> "Z-d dipole interactions (im part)" },
106 Rdze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdze[i_,j_]->0.1}, BlockName -> MBxdze, Description -> "Z-e dipole interactions (real part)"},
107 Idze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idze[i_,j_]->0.0}, BlockName -> IMMBxdze, Description -> "Z-e dipole interactions (im part)" },
108 Rdwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdwq[i_,j_]->0.1}, BlockName -> MBxdwq, Description -> "W-q dipole interactions (real part)"},
109 Idwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idwq[i_,j_]->0.0}, BlockName -> IMMBxdwq, Description -> "W-q dipole interactions (im part)" },
110 Rdwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdwl[i_,j_]->0.1}, BlockName -> MBxdwl, Description -> "W-l dipole interactions (real part)"},
111 Idwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idwl[i_,j_]->0.0}, BlockName -> IMMBxdwl, Description -> "W-l dipole interactions (im part)" },
112 Rtdgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdgu[i_,j_]->0.1}, BlockName -> MBxtdgu, Description -> "G-u dipole interactions (real part)"},
113 Itdgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdgu[i_,j_]->0.0}, BlockName -> IMMBxtdgu, Description -> "G-u dipole interactions (im part, CP-odd) "},
114 Rtdgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdgd[i_,j_]->0.1}, BlockName -> MBxtdgd, Description -> "G-d dipole interactions (real part, CP-odd)"},
115 Itdgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdgd[i_,j_]->0.0}, BlockName -> IMMBxtdgd, Description -> "G-d dipole interactions (im part, CP-odd)" },
116 Rtdau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdau[i_,j_]->0.1}, BlockName -> MBxtdau, Description -> "A-u dipole interactions (real part, CP-odd)"},
117 Itdau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdau[i_,j_]->0.0}, BlockName -> IMMBxtdau, Description -> "A-u dipole interactions (im part, CP-odd)" },
118 Rtdad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdad[i_,j_]->0.1}, BlockName -> MBxtdad, Description -> "A-d dipole interactions (real part, CP-odd)"},
119 Itdad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdad[i_,j_]->0.0}, BlockName -> IMMBxtdad, Description -> "A-d dipole interactions (im part, CP-odd)" },
120 Rtdae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdae[i_,j_]->0.1}, BlockName -> MBxtdae, Description -> "A-e dipole interactions (real part, CP-odd)"},
121 Itdae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdae[i_,j_]->0.0}, BlockName -> IMMBxtdae, Description -> "A-e dipole interactions (im part, CP-odd)" },
122 Rtdzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdzu[i_,j_]->0.1}, BlockName -> MBxtdzu, Description -> "Z-u dipole interactions (real part, CP-odd)"},
123 Itdzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdzu[i_,j_]->0.0}, BlockName -> IMMBxtdzu, Description -> "Z-u dipole interactions (im part, CP-odd)" },
124 Rtdzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdzd[i_,j_]->0.1}, BlockName -> MBxtdzd, Description -> "Z-d dipole interactions (real part, CP-odd)"},
125 Itdzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdzd[i_,j_]->0.0}, BlockName -> IMMBxtdzd, Description -> "Z-d dipole interactions (im part, CP-odd)" },
126 Rtdze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdze[i_,j_]->0.1}, BlockName -> MBxtdze, Description -> "Z-e dipole interactions (real part, CP-odd)"},
127 Itdze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdze[i_,j_]->0.0}, BlockName -> IMMBxtdze, Description -> "Z-e dipole interactions (im part, CP-odd)" },
128 Rtdwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdwq[i_,j_]->0.1}, BlockName -> MBxtdwq, Description -> "W-q dipole interactions (real part, CP-odd)"},
129 Itdwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdwq[i_,j_]->0.0}, BlockName -> IMMBxtdwq, Description -> "W-q dipole interactions (im part, CP-odd)" },
130
131 dgu == { TeX -> Subscript["d", gu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
132 Value -> {dgu[i_,j_]->Rdgu[i,j] + I Idgu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "G-u dipole interactions"},
133 dgd == { TeX -> Subscript["d", gd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
134 Value -> {dgd[i_,j_]->Rdgd[i,j] + I Idgd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "G-d dipole interactions"},
135 dau == { TeX -> Subscript["d", au], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
136 Value -> {dau[i_,j_]->Rdau[i,j] + I Idau[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-u dipole interactions"},
137 dad == { TeX -> Subscript["d", ad], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
138 Value -> {dad[i_,j_]->Rdad[i,j] + I Idad[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-d dipole interactions"},
139 dae == { TeX -> Subscript["d", ae], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
140 Value -> {dae[i_,j_]->Rdae[i,j] + I Idae[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-e dipole interactions"},
141 dzu == { TeX -> Subscript["d", zu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
142 Value -> {dzu[i_,j_]->Rdzu[i,j] + I Idzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-u dipole interactions"},
143 dzd == { TeX -> Subscript["d", zd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
144 Value -> {dzd[i_,j_]->Rdzd[i,j] + I Idzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-d dipole interactions"},
145 dze == { TeX -> Subscript["d", ze], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
146 Value -> {dze[i_,j_]->Rdze[i,j] + I Idze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-e dipole interactions"},
147 dwq == { TeX -> Subscript["d", wq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
148 Value -> {dwq[i_,j_]->Rdwq[i,j] + I Idwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "w-q dipole interactions"},
149 dwl == { TeX -> Subscript["d", wl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
150 Value -> {dwl[i_,j_]->Rdwl[i,j] + I Idwl[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "W-l dipole interactions"},
151 tdgu == { TeX -> Subscript[OverTilde["d"], gu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
152 Value -> {tdgu[i_,j_]->Rtdgu[i,j] + I Itdgu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "G-u dipole interactions (CP-odd)"},
153 tdgd == { TeX -> Subscript[OverTilde["d"], gd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
154 Value -> {tdgd[i_,j_]->Rtdgd[i,j] + I Itdgd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "G-d dipole interactions (CP-odd)"},
155 tdau == { TeX -> Subscript[OverTilde["d"], au], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
156 Value -> {tdau[i_,j_]->Rtdau[i,j] + I Itdau[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-u dipole interactions (CP-odd)"},
157 tdad == { TeX -> Subscript[OverTilde["d"], ad], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
158 Value -> {tdad[i_,j_]->Rtdad[i,j] + I Itdad[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-d dipole interactions (CP-odd)"},
159 tdae == { TeX -> Subscript[OverTilde["d"], ae], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
160 Value -> {tdae[i_,j_]->Rtdae[i,j] + I Itdae[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "A-e dipole interactions (CP-odd)"},
161 tdzu == { TeX -> Subscript[OverTilde["d"], zu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
162 Value -> {tdzu[i_,j_]->Rtdzu[i,j] + I Itdzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-u dipole interactions (CP-odd)"},
163 tdzd == { TeX -> Subscript[OverTilde["d"], zd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
164 Value -> {tdzd[i_,j_]->Rtdzd[i,j] + I Itdzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-d dipole interactions (CP-odd)"},
165 tdze == { TeX -> Subscript[OverTilde["d"], ze], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
166 Value -> {tdze[i_,j_]->Rtdze[i,j] + I Itdze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "Z-e dipole interactions (CP-odd)"},
167 tdwq == { TeX -> Subscript[OverTilde["d"], wq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
168 Value -> {tdwq[i_,j_]->Rtdwq[i,j] + I Itdwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "w-q dipole interactions (CP-odd)"},
169
170 (* Ltgc parameters *)
171 dKa == { TeX -> Subscript["\[Delta]\[Kappa]",a], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 1, Description -> "fsA-W-W interactions"},
172 dKz == { TeX -> Subscript["\[Delta]\[Kappa]",z], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 2, Description -> "fsZ-W-W interactions"},
173 dG1z == { TeX -> Subscript["\[Delta]g","1z"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 3, Description -> "fsW-W-Z interactions"},
174 La == { TeX -> Subscript["\[Lambda]",a], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 4, Description -> "fsW-fsW-fsA interactions"},
175 Lz == { TeX -> Subscript["\[Lambda]",z], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 5, Description -> "fsW-fsW-fsZ interactions"},
176 C3g == { TeX -> Subscript[c,"3G"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 6, Description -> "fsG-fsG-fsG interactions"},
177 tKa == { TeX -> Subscript[OverTilde["\[Kappa]"],a], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 7, Description -> "fsA-W-W interactions (CP-odd)"},
178 tKz == { TeX -> Subscript[OverTilde["\[Kappa]"],z], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 8, Description -> "fsZ-W-W interactions (CP-odd)"},
179 tLa == { TeX -> Subscript[OverTilde["\[Lambda]"],a], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 9, Description -> "fsW-fsW-fsA interactions (CP-odd)"},
180 tLz == { TeX -> Subscript[OverTilde["\[Lambda]"],z], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 10, Description -> "fsW-fsW-fsZ interactions (CP-odd)"},
181 tC3g== { TeX -> Subscript[OverTilde["c"],"3g"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxtgc, OrderBlock -> 11, Description -> "fsG-fsG-fsG interactions (CP-odd)"},
182
183 (* Lqgc parameters *)
184 dGw4 == { TeX -> Subscript["\[Delta]g",w4], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 1, Description -> "W^4 interactions"},
185 dGw2z2 == { TeX -> Subscript["\[Delta]g",w2z2], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 2, Description -> "W^2-Z^2 interactions"},
186 dGw2za == { TeX -> Subscript["\[Delta]g",w2za], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 3, Description -> "W^2-Z-A interactions"},
187 Lw4 == { TeX -> Subscript["\[Lambda]",w4], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 4, Description -> "fsW^2-W^2 interactions"},
188 Lw2z2 == { TeX -> Subscript["\[Lambda]",w2z2], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 5, Description -> "fsW-fsZ-W-Z interactions"},
189 Lw2a2 == { TeX -> Subscript["\[Lambda]",w2a2], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 6, Description -> "fsW-fsA-W-A interactions"},
190 Lw2az == { TeX -> Subscript["\[Lambda]",w2az], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 7, Description -> "fsW-fsA-W-Z interactions"},
191 Lw2za == { TeX -> Subscript["\[Lambda]",w2za], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 8, Description -> "fsW-fsZ-W-A interactions"},
192 C4g == { TeX -> Subscript[c,"4G"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 9, Description -> "fsG-fsG-G-G interactions"},
193 tLw4 == { TeX -> Subscript[OverTilde["\[Lambda]"],w4], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 10, Description -> "fsW^2-W^2 interactions (CP-odd)"},
194 tLw2z2 == { TeX -> Subscript[OverTilde["\[Lambda]"],w2z2], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 11, Description -> "fsW-fsZ-W-Z interactions (CP-odd)"},
195 tLw2a2 == { TeX -> Subscript[OverTilde["\[Lambda]"],w2a2], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 12, Description -> "fsW-fsA-W-A interactions (CP-odd)"},
196 tLw2az == { TeX -> Subscript[OverTilde["\[Lambda]"],w2az], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 13, Description -> "fsW-fsA-W-Z interactions (CP-odd)"},
197 tLw2za == { TeX -> Subscript[OverTilde["\[Lambda]"],w2za], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 14, Description -> "fsW-fsZ-W-A interactions (CP-odd)"},
198 tC4g == { TeX -> Subscript[OverTilde[c],"4G"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxqgc, OrderBlock -> 15, Description -> "fsG-fsG-G-G interactions (CP-odd)"},
199
200 (* Lh parameters *)
201 dCw == { TeX -> Subscript["\[Delta]c",w], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 1, Description -> "W-W-h interactions"},
202 dCz == { TeX -> Subscript["\[Delta]c",z], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 2, Description -> "Z-Z-h interactions"},
203 Cww == { TeX -> Subscript[c,ww], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 3, Description -> "fsW-fsW-h interactions"},
204 Cgg == { TeX -> Subscript[c,gg], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 4, Description -> "fsG-fsG-h interactions"},
205 Caa == { TeX -> Subscript[c,aa], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 5, Description -> "fsA-fsA-h interactions"},
206 Cza == { TeX -> Subscript[c,za], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 6, Description -> "fsZ-fsA-h interactions"},
207 Czz == { TeX -> Subscript[c,zz], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 7, Description -> "fsZ-fsZ-h interactions"},
208 Cwbx == { TeX -> Subscript[c,w,Square[""]], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 8, Description -> "fsW-W-h interactions"},
209 Czbx == { TeX -> Subscript[c,z,Square[""]], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 9, Description -> "fsZ-Z-h interactions"},
210 Cabx == { TeX -> Subscript[c,a,Square[""]], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 10,Description -> "fsA-Z-h interactions"},
211 tCww == { TeX -> Subscript[OverTilde[c],ww], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 11, Description -> "fsW-fsW-h interactions (CP-odd)"},
212 tCgg == { TeX -> Subscript[OverTilde[c],gg], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 12, Description -> "fsG-fsG-h interactions (CP-odd)"},
213 tCaa == { TeX -> Subscript[OverTilde[c],aa], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 13, Description -> "fsA-fsA-h interactions (CP-odd)"},
214 tCza == { TeX -> Subscript[OverTilde[c],za], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 14, Description -> "fsZ-fsA-h interactions (CP-odd)"},
215 tCzz == { TeX -> Subscript[OverTilde[c],zz], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxh, OrderBlock -> 15, Description -> "fsZ-fsZ-h interactions (CP-odd)"},
216
217 dYu == { TeX -> Subscript["\[Delta]Y",u], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {dYu[i_,j_]->0.1}, InteractionOrder -> {QNP, 1},
218 BlockName -> MBxdYu, Description -> "Norm of Huu couplings"},
219 dYd == { TeX -> Subscript["\[Delta]Y",d], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {dYd[i_,j_]->0.1}, InteractionOrder -> {QNP, 1},
220 BlockName -> MBxdYd, Description -> "Norm of Hdd couplings"},
221 dYe == { TeX -> Subscript["\[Delta]Y",e], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {dYe[i_,j_]->0.1}, InteractionOrder -> {QNP, 1},
222 BlockName -> MBxdYe, Description -> "Norm of Hee couplings"},
223 Su == { TeX -> Subscript[S,"\[Phi]u"], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Su[i_,j_]->0.707107}, BlockName -> MBxSu, Description -> "Sin(phase) of Huu couplings"},
224 Sd == { TeX -> Subscript[S,"\[Phi]d"], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Sd[i_,j_]->0.707107}, BlockName -> MBxSd, Description -> "Sin(phase) of Hdd couplings"},
225 Se == { TeX -> Subscript[S,"\[Phi]e"], ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Se[i_,j_]->0.707107}, BlockName -> MBxSe, Description -> "Sin(phase) of Hee couplings"},
226 Cu == { TeX -> Subscript[C,"\[Phi]u"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, Value -> {Cu[i_,j_]->Sqrt[1-Su[i,j]^2]}, Description -> "Cos(phase) of Huu couplings"},
227 Cd == { TeX -> Subscript[C,"\[Phi]d"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, Value -> {Cd[i_,j_]->Sqrt[1-Sd[i,j]^2]}, Description -> "Cos(phase) of Huu couplings"},
228 Ce == { TeX -> Subscript[C,"\[Phi]e"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, Value -> {Ce[i_,j_]->Sqrt[1-Se[i,j]^2]}, Description -> "Cos(phase) of Huu couplings"},
229
230 (* Lhvff parameters *)
231 RdGLhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhzu[i_,j_]->0.1}, BlockName -> MBxdGLhzu, Description -> "h-Z-u vertex interactions (real part, L)"},
232 IdGLhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhzu[i_,j_]->0.0}, BlockName -> IMMBxdGLhzu, Description -> "h-Z-u vertex interactions (im part, L)" },
233 RdGLhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhzd[i_,j_]->0.1}, BlockName -> MBxdGLhzd, Description -> "h-Z-d vertex interactions (real part, L)"},
234 IdGLhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhzd[i_,j_]->0.0}, BlockName -> IMMBxdGLhzd, Description -> "h-Z-d vertex interactions (im part, L)" },
235 RdGLhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhze[i_,j_]->0.1}, BlockName -> MBxdGLhzl, Description -> "h-Z-l vertex interactions (real part, L)"},
236 IdGLhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhze[i_,j_]->0.0}, BlockName -> IMMBxdGLhzl, Description -> "h-Z-l vertex interactions (im part, L)"},
237 RdGLhzv == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhzv[i_,j_]->0.1}, BlockName -> MBxdGLhzv, Description -> "h-Z-v vertex interactions (real part, L)"},
238 IdGLhzv == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhzv[i_,j_]->0.0}, BlockName -> IMMBxdGLhzv, Description -> "h-Z-v vertex interactions (im part, L)"},
239 RdGRhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRhzu[i_,j_]->0.1}, BlockName -> MBxdGRhzu, Description -> "h-Z-u vertex interactions (real part, R)"},
240 IdGRhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRhzu[i_,j_]->0.0}, BlockName -> IMMBxdGRhzu, Description -> "h-Z-u vertex interactions (im part, R)" },
241 RdGRhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRhzd[i_,j_]->0.1}, BlockName -> MBxdGRhzd, Description -> "h-Z-d vertex interactions (real part, R)"},
242 IdGRhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRhzd[i_,j_]->0.0}, BlockName -> IMMBxdGRhzd, Description -> "h-Z-d vertex interactions (im part, R)" },
243 RdGRhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRhze[i_,j_]->0.1}, BlockName -> MBxdGRhzl, Description -> "h-Z-l vertex interactions (real part, R)"},
244 IdGRhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRhze[i_,j_]->0.0}, BlockName -> IMMBxdGRhzl, Description -> "h-Z-l vertex interactions (im part, R)"},
245 RdGLhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhwq[i_,j_]->0.1}, BlockName -> MBxdGhWLq, Description -> "h-W-q vertex interactions (real part, L)"},
246 IdGLhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhwq[i_,j_]->0.0}, BlockName -> IMMBxdGhWLq, Description -> "h-W-q vertex interactions (im part, L)" },
247 RdGRhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGRhwq[i_,j_]->0.1}, BlockName -> MBxdGhWRq, Description -> "h-W-q vertex interactions (real part, R)"},
248 IdGRhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGRhwq[i_,j_]->0.0}, BlockName -> IMMBxdGhWRq, Description -> "h-W-q vertex interactions (im part, R)" },
249 RdGLhwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdGLhwl[i_,j_]->0.1}, BlockName -> MBxdGhWLl, Description -> "h-W-l vertex interactions (real part, L)"},
250 IdGLhwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdGLhwl[i_,j_]->0.0}, BlockName -> IMMBxdGhWLl, Description -> "h-W-l vertex interactions (im part, L)" },
251
252 dGLhzu == { TeX -> Subsuperscript["\[Delta]g", L, hZu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
253 Value -> {dGLhzu[i_,j_]->RdGLhzu[i,j] + I IdGLhzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-u vertex interactions (L)"},
254 dGLhzd == { TeX -> Subsuperscript["\[Delta]g", L, hZd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
255 Value -> {dGLhzd[i_,j_]->RdGLhzd[i,j] + I IdGLhzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-d vertex interactions (L)"},
256 dGLhze == { TeX -> Subsuperscript["\[Delta]g", L, hZl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
257 Value -> {dGLhze[i_,j_]->RdGLhze[i,j] + I IdGLhze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-l vertex interactions (L)"},
258 dGLhzv == { TeX -> Subsuperscript["\[Delta]g", L, hZv], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
259 Value -> {dGLhzv[i_,j_]->RdGLhzv[i,j] + I IdGLhzv[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-v vertex interactions (L)"},
260 dGRhzu == { TeX -> Subsuperscript["\[Delta]g", R, hZu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
261 Value -> {dGRhzu[i_,j_]->RdGRhzu[i,j] + I IdGRhzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-u vertex interactions (R)"},
262 dGRhzd == { TeX -> Subsuperscript["\[Delta]g", R, hZd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
263 Value -> {dGRhzd[i_,j_]->RdGRhzd[i,j] + I IdGRhzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-d vertex interactions (R)"},
264 dGRhze == { TeX -> Subsuperscript["\[Delta]g", R, hZl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
265 Value -> {dGRhze[i_,j_]->RdGRhze[i,j] + I IdGRhze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-l vertex interactions (R)"},
266 dGLhwq == { TeX -> Subsuperscript["\[Delta]g", L, hWq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
267 Value -> {dGLhwq[i_,j_]->RdGLhwq[i,j] + I IdGLhwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-W-q vertex interactions (L)"},
268 dGRhwq == { TeX -> Subsuperscript["\[Delta]g", R, hWq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
269 Value -> {dGRhwq[i_,j_]->RdGRhwq[i,j] + I IdGRhwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-W-q vertex interactions (R)"},
270 dGLhwl == { TeX -> Subsuperscript["\[Delta]g", L, hWl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
271 Value -> {dGLhwl[i_,j_]->RdGLhwl[i,j] + I IdGLhwl[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-W-l vertex interactions (L)"},
272
273
274 (* Lhdvff parameters *)
275 Rdhgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhgu[i_,j_]->0.1}, BlockName -> MBxdhgu, Description -> "h-G-u dipole interactions (real part)"},
276 Idhgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhgu[i_,j_]->0.0}, BlockName -> IMMBxdhgu, Description -> "h-G-u dipole interactions (im part)" },
277 Rdhgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhgd[i_,j_]->0.1}, BlockName -> MBxdhgd, Description -> "h-G-d dipole interactions (real part)"},
278 Idhgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhgd[i_,j_]->0.0}, BlockName -> IMMBxdhgd, Description -> "h-G-d dipole interactions (im part)" },
279 Rdhau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhau[i_,j_]->0.1}, BlockName -> MBxdhau, Description -> "h-A-u dipole interactions (real part)"},
280 Idhau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhau[i_,j_]->0.0}, BlockName -> IMMBxdhau, Description -> "h-A-u dipole interactions (im part)" },
281 Rdhad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhad[i_,j_]->0.1}, BlockName -> MBxdhad, Description -> "h-A-d dipole interactions (real part)"},
282 Idhad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhad[i_,j_]->0.0}, BlockName -> IMMBxdhad, Description -> "h-A-d dipole interactions (im part)" },
283 Rdhae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhae[i_,j_]->0.1}, BlockName -> MBxdhae, Description -> "h-A-e dipole interactions (real part)"},
284 Idhae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhae[i_,j_]->0.0}, BlockName -> IMMBxdhae, Description -> "h-A-e dipole interactions (im part)" },
285 Rdhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhzu[i_,j_]->0.1}, BlockName -> MBxdhzu, Description -> "h-Z-u dipole interactions (real part)"},
286 Idhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhzu[i_,j_]->0.0}, BlockName -> IMMBxdhzu, Description -> "h-Z-u dipole interactions (im part)" },
287 Rdhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhzd[i_,j_]->0.1}, BlockName -> MBxdhzd, Description -> "h-Z-d dipole interactions (real part)"},
288 Idhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhzd[i_,j_]->0.0}, BlockName -> IMMBxdhzd, Description -> "h-Z-d dipole interactions (im part)" },
289 Rdhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhze[i_,j_]->0.1}, BlockName -> MBxdhze, Description -> "h-Z-e dipole interactions (real part)"},
290 Idhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhze[i_,j_]->0.0}, BlockName -> IMMBxdhze, Description -> "h-Z-e dipole interactions (im part)" },
291 Rdhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhwq[i_,j_]->0.1}, BlockName -> MBxdhwq, Description -> "h-W-q dipole interactions (real part)"},
292 Idhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhwq[i_,j_]->0.0}, BlockName -> IMMBxdhwq, Description -> "h-W-q dipole interactions (im part)" },
293 Rdhwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rdhwl[i_,j_]->0.1}, BlockName -> MBxdhwl, Description -> "h-W-l dipole interactions (real part)"},
294 Idhwl == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Idhwl[i_,j_]->0.0}, BlockName -> IMMBxdhwl, Description -> "h-W-l dipole interactions (im part)" },
295 Rtdhgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhgu[i_,j_]->0.1}, BlockName -> MBxtdhgu, Description -> "h-G-u dipole interactions (real part)"},
296 Itdhgu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhgu[i_,j_]->0.0}, BlockName -> IMMBxtdhgu, Description -> "h-G-u dipole interactions (im part, CP-odd) "},
297 Rtdhgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhgd[i_,j_]->0.1}, BlockName -> MBxtdhgd, Description -> "h-G-d dipole interactions (real part, CP-odd)"},
298 Itdhgd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhgd[i_,j_]->0.0}, BlockName -> IMMBxtdhgd, Description -> "h-G-d dipole interactions (im part, CP-odd)" },
299 Rtdhau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhau[i_,j_]->0.1}, BlockName -> MBxtdhau, Description -> "h-A-u dipole interactions (real part, CP-odd)"},
300 Itdhau == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhau[i_,j_]->0.0}, BlockName -> IMMBxtdhau, Description -> "h-A-u dipole interactions (im part, CP-odd)" },
301 Rtdhad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhad[i_,j_]->0.1}, BlockName -> MBxtdhad, Description -> "h-A-d dipole interactions (real part, CP-odd)"},
302 Itdhad == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhad[i_,j_]->0.0}, BlockName -> IMMBxtdhad, Description -> "h-A-d dipole interactions (im part, CP-odd)" },
303 Rtdhae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhae[i_,j_]->0.1}, BlockName -> MBxtdhae, Description -> "h-A-e dipole interactions (real part, CP-odd)"},
304 Itdhae == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhae[i_,j_]->0.0}, BlockName -> IMMBxtdhae, Description -> "h-A-e dipole interactions (im part, CP-odd)" },
305 Rtdhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhzu[i_,j_]->0.1}, BlockName -> MBxtdhzu, Description -> "h-Z-u dipole interactions (real part, CP-odd)"},
306 Itdhzu == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhzu[i_,j_]->0.0}, BlockName -> IMMBxtdhzu, Description -> "h-Z-u dipole interactions (im part, CP-odd)" },
307 Rtdhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhzd[i_,j_]->0.1}, BlockName -> MBxtdhzd, Description -> "h-Z-d dipole interactions (real part, CP-odd)"},
308 Itdhzd == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhzd[i_,j_]->0.0}, BlockName -> IMMBxtdhzd, Description -> "h-Z-d dipole interactions (im part, CP-odd)" },
309 Rtdhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhze[i_,j_]->0.1}, BlockName -> MBxtdhze, Description -> "h-Z-e dipole interactions (real part, CP-odd)"},
310 Itdhze == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhze[i_,j_]->0.0}, BlockName -> IMMBxtdhze, Description -> "h-Z-e dipole interactions (im part, CP-odd)" },
311 Rtdhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Rtdhwq[i_,j_]->0.1}, BlockName -> MBxtdhwq, Description -> "h-W-q dipole interactions (real part, CP-odd)"},
312 Itdhwq == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {Itdhwq[i_,j_]->0.0}, BlockName -> IMMBxtdhwq, Description -> "h-W-q dipole interactions (im part, CP-odd)" },
313
314 dhgu == { TeX -> Subscript["d", hgu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
315 Value -> {dhgu[i_,j_]->Rdhgu[i,j] + I Idhgu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-G-u dipole interactions"},
316 dhgd == { TeX -> Subscript["d", hgd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
317 Value -> {dhgd[i_,j_]->Rdhgd[i,j] + I Idhgd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-G-d dipole interactions"},
318 dhau == { TeX -> Subscript["d", hau], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
319 Value -> {dhau[i_,j_]->Rdhau[i,j] + I Idhau[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-u dipole interactions"},
320 dhad == { TeX -> Subscript["d", had], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
321 Value -> {dhad[i_,j_]->Rdhad[i,j] + I Idhad[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-d dipole interactions"},
322 dhae == { TeX -> Subscript["d", hae], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
323 Value -> {dhae[i_,j_]->Rdhae[i,j] + I Idhae[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-e dipole interactions"},
324 dhzu == { TeX -> Subscript["d", hzu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
325 Value -> {dhzu[i_,j_]->Rdhzu[i,j] + I Idhzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-u dipole interactions"},
326 dhzd == { TeX -> Subscript["d", hzd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
327 Value -> {dhzd[i_,j_]->Rdhzd[i,j] + I Idhzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-d dipole interactions"},
328 dhze == { TeX -> Subscript["d", hze], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
329 Value -> {dhze[i_,j_]->Rdhze[i,j] + I Idhze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-e dipole interactions"},
330 dhwq == { TeX -> Subscript["d", hwq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
331 Value -> {dhwq[i_,j_]->Rdhwq[i,j] + I Idhwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-w-q dipole interactions"},
332 dhwl == { TeX -> Subscript["d", hwl], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
333 Value -> {dhwl[i_,j_]->Rdhwl[i,j] + I Idhwl[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-W-l dipole interactions"},
334
335 tdhgu == { TeX -> Subscript[OverTilde["d"], hgu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
336 Value -> {tdhgu[i_,j_]->Rtdhgu[i,j] + I Itdhgu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-G-u dipole interactions (CP-odd)"},
337 tdhgd == { TeX -> Subscript[OverTilde["d"], hgd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
338 Value -> {tdhgd[i_,j_]->Rtdhgd[i,j] + I Itdhgd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-G-d dipole interactions (CP-odd)"},
339 tdhau == { TeX -> Subscript[OverTilde["d"], hau], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
340 Value -> {tdhau[i_,j_]->Rtdhau[i,j] + I Itdhau[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-u dipole interactions (CP-odd)"},
341 tdhad == { TeX -> Subscript[OverTilde["d"], had], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
342 Value -> {tdhad[i_,j_]->Rtdhad[i,j] + I Itdhad[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-d dipole interactions (CP-odd)"},
343 tdhae == { TeX -> Subscript[OverTilde["d"], hae], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
344 Value -> {tdhae[i_,j_]->Rtdhae[i,j] + I Itdhae[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-A-e dipole interactions (CP-odd)"},
345 tdhzu == { TeX -> Subscript[OverTilde["d"], hzu], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
346 Value -> {tdhzu[i_,j_]->Rtdhzu[i,j] + I Itdhzu[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-u dipole interactions (CP-odd)"},
347 tdhzd == { TeX -> Subscript[OverTilde["d"], hzd], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
348 Value -> {tdhzd[i_,j_]->Rtdhzd[i,j] + I Itdhzd[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-d dipole interactions (CP-odd)"},
349 tdhze == { TeX -> Subscript[OverTilde["d"], hze], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
350 Value -> {tdhze[i_,j_]->Rtdhze[i,j] + I Itdhze[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-Z-e dipole interactions (CP-odd)"},
351 tdhwq == { TeX -> Subscript[OverTilde["d"], hwq], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter->True,
352 Value -> {tdhwq[i_,j_]->Rtdhwq[i,j] + I Itdhwq[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "h-w-q dipole interactions (CP-odd)"},
353
354 (* Lhself parameters *)
355 dL3 == { TeX -> Subscript["\[Delta]\[Lambda]",3], ParameterType -> External, Value -> 0.1, InteractionOrder -> {{QED,1}, {QNP, 1}}, BlockName -> MBxhself, OrderBlock -> 1, Description -> "Trilinear Higgs self-coupling"},
356 dL4 == { TeX -> Subscript["\[Delta]\[Lambda]",4], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhself, OrderBlock -> 2, Description -> "Quartic Higgs self-coupling"},
357
358 (* Lhh parameters *)
359 dCw2 == { TeX -> Subsuperscript["\[Delta]c",w,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 1, Description -> "W-W-h-h interactions"},
360 dCz2 == { TeX -> Subsuperscript["\[Delta]c",z,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 2, Description -> "Z-Z-h-h interactions"},
361 Cww2 == { TeX -> Subsuperscript[c,ww,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 3, Description -> "fsW-fsW-h-h interactions"},
362 Cgg2 == { TeX -> Subsuperscript[c,gg,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 4, Description -> "fsG-fsG-h-h interactions"},
363 Caa2 == { TeX -> Subsuperscript[c,aa,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 5, Description -> "fsA-fsA-h-h interactions"},
364 Cza2 == { TeX -> Subsuperscript[c,za,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 6, Description -> "fsZ-fsA-h-h interactions"},
365 Czz2 == { TeX -> Subsuperscript[c,zz,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 7, Description -> "fsZ-fsZ-h-h interactions"},
366 Cwbx2 == { TeX -> Subsuperscript[c,w,Square[""],"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 8, Description -> "fsW-W-h-h interactions"},
367 Czbx2 == { TeX -> Subsuperscript[c,z,Square[""],"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 9, Description -> "fsZ-Z-h-h interactions"},
368 Cabx2 == { TeX -> Subsuperscript[c,a,Square[""],"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 10,Description -> "fsA-Z-h-h interactions"},
369 tCww2 == { TeX -> Subsuperscript[OverTilde[c],ww,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 11, Description -> "fsW-fsW-h-h interactions (CP-odd)"},
370 tCgg2 == { TeX -> Subsuperscript[OverTilde[c],gg,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 12, Description -> "fsG-fsG-h-h interactions (CP-odd)"},
371 tCaa2 == { TeX -> Subsuperscript[OverTilde[c],aa,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 13, Description -> "fsA-fsA-h-h interactions (CP-odd)"},
372 tCza2 == { TeX -> Subsuperscript[OverTilde[c],za,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 14, Description -> "fsZ-fsA-h-h interactions (CP-odd)"},
373 tCzz2 == { TeX -> Subsuperscript[OverTilde[c],zz,"(2)"], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBxhh, OrderBlock -> 15, Description -> "fsZ-fsZ-h-h interactions (CP-odd)"},
374
375 RdYu2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdYu2[i_,j_]->0.1}, BlockName -> MBxdYu2, Description -> "HHuu couplings (real part)"},
376 RdYd2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdYd2[i_,j_]->0.1}, BlockName -> MBxdYd2, Description -> "HHdd couplings (real part)"},
377 RdYe2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {RdYe2[i_,j_]->0.1}, BlockName -> MBxdYe2, Description -> "HHee couplings (real part)"},
378 IdYu2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdYu2[i_,j_]->0.0}, BlockName -> IMMBxdYu2, Description -> "HHuu couplings (im part)"},
379 IdYd2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdYd2[i_,j_]->0.0}, BlockName -> IMMBxdYd2, Description -> "HHdd couplings (im part)"},
380 IdYe2 == { ParameterType -> External, Indices -> {Index[Generation], Index[Generation]}, Value -> {IdYe2[i_,j_]->0.0}, BlockName -> IMMBxdYe2, Description -> "HHee couplings (im part)"},
381
382 dYu2 == { TeX -> Subsuperscript["\[Delta]Y",u,"(2)"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter -> True,
383 Value -> {dYu2[i_,j_]->RdYu2[i,j]+I*IdYu2[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "HHuu couplings"},
384 dYd2 == { TeX -> Subsuperscript["\[Delta]Y",d,"(2)"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter -> True,
385 Value -> {dYd2[i_,j_]->RdYd2[i,j]+I*IdYd2[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "HHdd couplings"},
386 dYe2 == { TeX -> Subsuperscript["\[Delta]Y",e,"(2)"], ParameterType -> Internal, Indices -> {Index[Generation], Index[Generation]}, ComplexParameter -> True,
387 Value -> {dYe2[i_,j_]->RdYe2[i,j]+I*IdYe2[i,j]}, InteractionOrder -> {QNP, 1}, Description -> "HHee couplings"},
388
389 (* Four-fermion interactions *)
390 cll1122 == { TeX -> Subscript[c,ll,1122], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBx4f, OrderBlock -> 1, Description -> "Four fermion interaction strength"},
391 cpuu3333== { TeX -> Subscript["c'",uu,3333], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBx4f, OrderBlock -> 2, Description -> "Four fermion interaction strength"},
392 cll1221 == { TeX -> Subscript[c,ll,1221], ParameterType -> External, Value -> 0.1, InteractionOrder -> {QNP, 1}, BlockName -> MBx4f, OrderBlock -> 3, Description -> "Four fermion interaction strength"}
393};
394
395
396(* ************************** *)
397(* ***** Lagrangian ***** *)
398(* ************************** *)
399
400(* eq. (3.3 *)
401LMass:= 2 dM gw^2 vev^2/4 W[mu] Wbar[mu];
402
403(* eq. (3.4) *)
404Lvertex := Block[{LZ,LW},
405 LZ = Sqrt[gw^2+g1^2] Z[mu] ( uqbar.Ga[mu].dGLzu.ProjM.uq + dqbar.Ga[mu].dGLzd.ProjM.dq + lbar.Ga[mu].dGLze.ProjM.l + vlbar.Ga[mu].dGLzv.ProjM.vl +
406 uqbar.Ga[mu].dGRzu.ProjP.uq + dqbar.Ga[mu].dGRzd.ProjP.dq + lbar.Ga[mu].dGRze.ProjP.l );
407 LW= gw/Sqrt[2] W[mu] (uqbar.Ga[mu].dGLwq.ProjM.dq + uqbar.Ga[mu].dGRwq.ProjP.dq + vlbar.Ga[mu].dGLwl.ProjM.l);
408 LZ+LW+HC[LW]
409];
410
411(* eq. (3.5) for the dipole terms *)
412Ldip:=Block[{LG,LA,LZ,LW},
413 LG = gs FS[G,mu,nu,a] (uqbar.Sig[mu,nu].T[a].dgu.uq + dqbar.Sig[mu,nu].T[a].dgd.dq) +
414 gs Dual[FS][G,mu,nu,a] (uqbar.Sig[mu,nu].T[a].tdgu.uq + dqbar.Sig[mu,nu].T[a].tdgd.dq);
415 LA = ee FS[A,mu,nu] (uqbar.Sig[mu,nu].dau.uq + dqbar.Sig[mu,nu].dad.dq + lbar.Sig[mu,nu].dae.l) +
416 ee Dual[FS][A,mu,nu] (uqbar.Sig[mu,nu].tdau.uq + dqbar.Sig[mu,nu].tdad.dq + lbar.Sig[mu,nu].tdae.l);
417 LZ = Sqrt[gw^2+g1^2] FS[Z,mu,nu] (uqbar.Sig[mu,nu].dzu.uq + dqbar.Sig[mu,nu].dzd.dq + lbar.Sig[mu,nu].dze.l) +
418 Sqrt[gw^2+g1^2] Dual[FS][Z,mu,nu] (uqbar.Sig[mu,nu].tdzu.uq + dqbar.Sig[mu,nu].tdzd.dq + lbar.Sig[mu,nu].tdze.l);
419 LW = Sqrt[2] gw (FS[Wbar,mu,nu] dqbar.Sig[mu,nu].dwq.uq + FS[W,mu,nu] vlbar.Sig[mu,nu].dwl.l) +
420 Sqrt[2] gw Dual[FS][Wbar,mu,nu] dqbar.Sig[mu,nu].tdwq.uq;
421 -1/(4 vev) (LG+LA+LZ+LW+HC[LW])
422];
423
424(* eqs. (3.6) and (3.7) for the gauge boson self-interactions *)
425Ltgc := I ee ( dKa FS[A,mu,nu] W[mu] Wbar[nu] + tKa Dual[FS][A,mu,nu] W[mu] Wbar[nu] ) +
426 I gw cw ( dG1z (FS[W,mu,nu] Wbar[mu] - FS[Wbar,mu,nu] W[mu] ) Z[nu] + dKz FS[Z,mu,nu] W[mu] Wbar[nu] + tKz Dual[FS][Z,mu,nu] W[mu] Wbar[nu] ) +
427 I ee/MW^2 ( La FS[W,mu,nu] FS[Wbar,nu,rho] FS[A,rho,mu] + tLa FS[W,mu,nu] FS[Wbar,nu,rho] Dual[FS][A,rho,mu] ) +
428 I gw cw/MW^2 ( Lz FS[W,mu,nu] FS[Wbar,nu,rho] FS[Z,rho,mu] + tLz FS[W,mu,nu] FS[Wbar,nu,rho] Dual[FS][Z,rho,mu] ) +
429 gs^3/vev^2 f[a,b,c] ( C3g FS[G,mu,nu,a] FS[G,nu,rho,b] FS[G,rho,mu,c] + tC3g Dual[FS][G,mu,nu,a] FS[G,nu,rho,b] FS[G,rho,mu,c] );
430
431Lqgc := gw^2/2 dGw4 ( W[mu] W[mu] Wbar[nu] Wbar[nu] - W[mu] Wbar[mu] W[nu] Wbar[nu] ) +
432 gw^2 cw^2 dGw2z2 ( W[mu] Z[mu] Wbar[nu] Z[nu] - W[mu] Wbar[mu] Z[nu] Z[nu] ) +
433 gw^2 cw sw dGw2za ( W[mu] Z[mu] Wbar[nu] A[nu] + W[mu] A[mu] Wbar[nu] Z[nu] - 2 W[mu] Wbar[mu] Z[nu] A[nu] ) -
434 gw^2/2/MW^2 Lw4 ( FS[W,mu,nu] FS[Wbar,nu,rho] - FS[Wbar,mu,nu] FS[W,nu,rho] ) ( W[mu] Wbar[rho] - Wbar[mu] W[rho] ) -
435 gw^2 cw^2/MW^2 Lw2z2 ( W[mu] ( FS[Z,mu,nu] FS[Wbar,nu,rho] - FS[Wbar,mu,nu] FS[Z,nu,rho] ) Z[rho] + Wbar[mu] ( FS[Z,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[Z,nu,rho] ) Z[rho] ) -
436 ee^2/MW^2 Lw2a2 ( W[mu] ( FS[A,mu,nu] FS[Wbar,nu,rho] - FS[Wbar,mu,nu] FS[A,nu,rho] ) A[rho] + Wbar[mu] ( FS[A,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[A,nu,rho] ) A[rho] ) -
437 ee gw cw/MW^2 Lw2az ( W[mu] ( FS[A,mu,nu] FS[Wbar,nu,rho] - FS[Wbar,mu,nu] FS[A,nu,rho] ) Z[rho] + Wbar[mu] ( FS[A,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[A,nu,rho] ) Z[rho] ) -
438 ee gw cw/MW^2 Lw2za ( W[mu] ( FS[Z,mu,nu] FS[Wbar,nu,rho] - FS[Wbar,mu,nu] FS[Z,nu,rho] ) A[rho] + Wbar[mu] ( FS[Z,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[Z,nu,rho] ) A[rho] ) +
439 3 gs^3/vev^2 C4g f[a,b,c] f[c,d,e] FS[G,mu,nu,a] FS[G,nu,rho,b] G[rho,d] G[mu,e] -
440 gw^2/2/MW^2 tLw4 ( FS[W,mu,nu] Dual[FS][Wbar,nu,rho] - FS[Wbar,mu,nu] Dual[FS][W,nu,rho] ) ( W[mu] Wbar[rho] - Wbar[mu] W[rho] ) -
441 gw^2 cw^2/MW^2 tLw2z2 ( W[mu] ( FS[Z,mu,nu] Dual[FS][Wbar,nu,rho] - FS[Wbar,mu,nu] Dual[FS][Z,nu,rho] ) Z[rho] + Wbar[mu] ( FS[Z,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[Z,nu,rho] ) Z[rho] ) -
442 ee^2/MW^2 tLw2a2 ( W[mu] ( FS[A,mu,nu] Dual[FS][Wbar,nu,rho] - FS[Wbar,mu,nu] Dual[FS][A,nu,rho] ) A[rho] + Wbar[mu] ( FS[A,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[A,nu,rho] ) A[rho] ) -
443 ee gw cw/MW^2 tLw2az ( W[mu] ( FS[A,mu,nu] Dual[FS][Wbar,nu,rho] - FS[Wbar,mu,nu] Dual[FS][A,nu,rho] ) Z[rho] + Wbar[mu] ( FS[A,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[A,nu,rho] ) Z[rho] ) -
444 ee gw cw/MW^2 tLw2za ( W[mu] ( FS[Z,mu,nu] Dual[FS][Wbar,nu,rho] - FS[Wbar,mu,nu] Dual[FS][Z,nu,rho] ) A[rho] + Wbar[mu] ( FS[Z,mu,nu] FS[W,nu,rho] - FS[W,mu,nu] FS[Z,nu,rho] ) A[rho] ) +
445 3 gs^3/vev^2 tC4g f[a,b,c] f[c,d,e] Dual[FS][G,mu,nu,a] FS[G,nu,rho,b] G[rho,d] G[mu,e];
446
447
448(* eq.(3.8) for the 3-point single Higgs interactions*)
449Lh := Block[{Lvv,Lff},
450 Lvv = 2 dCw MW^2 Wbar[mu] W[mu] + dCz MZ^2 Z[mu] Z[mu] +
451 gs^2/4 Cgg FS[G,mu,nu,a] FS[G,mu,nu,a] + gs^2/4 tCgg FS[G,mu,nu,a] Dual[FS][G,mu,nu,a] +
452 gw^2/2 Cww FS[Wbar,mu,nu] FS[W,mu,nu] + gw^2/2 tCww FS[Wbar,mu,nu] Dual[FS][W,mu,nu] +
453 ee^2/4 Caa FS[A,mu,nu] FS[A,mu,nu] + ee^2/4 tCaa FS[A,mu,nu] Dual[FS][A,mu,nu] +
454 ee gw/2/cw Cza FS[Z,mu,nu] FS[A,mu,nu] + ee gw/2/cw tCza FS[Z,mu,nu] Dual[FS][A,mu,nu] +
455 gw^2/4/cw^2 Czz FS[Z,mu,nu] FS[Z,mu,nu] + gw^2/4/cw^2 tCzz FS[Z,mu,nu] Dual[FS][Z,mu,nu] +
456 gw^2 Cwbx (Wbar[mu] del[FS[W,mu,nu],nu] + W[mu] del[FS[Wbar,mu,nu],nu]) + g1 gw Cabx Z[mu] del[FS[A,mu,nu],nu] + gw^2 Czbx Z[mu] del[FS[Z,mu,nu],nu];
457 Lff = - ExpandIndices[Plus@@Flatten[Table[Sqrt[Mu[ff] Mu[ffp]] dYu[ff,ffp] (Cu[ff,ffp] IndexDelta[sp1,sp2]-I*Su[ff,ffp] Ga[5,sp1,sp2]) uqbar[sp1,ff,cc].uq[sp2,ffp,cc], {ffp,1,3},{ff,1,3}]]] -
458 ExpandIndices[Plus@@Flatten[Table[Sqrt[Md[ff] Md[ffp]] dYd[ff,ffp] (Cd[ff,ffp] IndexDelta[sp1,sp2]-I*Sd[ff,ffp] Ga[5,sp1,sp2]) dqbar[sp1,ff,cc].dq[sp2,ffp,cc], {ffp,1,3},{ff,1,3}]]] -
459 ExpandIndices[Plus@@Flatten[Table[Sqrt[Ml[ff] Ml[ffp]] dYe[ff,ffp] (Ce[ff,ffp] IndexDelta[sp1,sp2]-I*Se[ff,ffp] Ga[5,sp1,sp2]) lbar[sp1,ff].l[sp2,ffp], {ffp,1,3},{ff,1,3}]]];
460 H/vev (Lvv + Lff)
461];
462
463(* eq (3.9) for the hvff interactions *)
464Lhvff := Block[{LW,LZ},
465 LW = Sqrt[2] gw H/vev W[mu] (uqbar.Ga[mu].dGLhwq.ProjM.dq + uqbar.Ga[mu].dGRhwq.ProjP.dq + vlbar.Ga[mu].dGLhwl.ProjM.l);
466 LZ = 2 Sqrt[gw^2+g1^2] H/vev Z[mu] ( uqbar.Ga[mu].dGLhzu.ProjM.uq + dqbar.Ga[mu].dGLhzd.ProjM.dq + lbar.Ga[mu].dGLhze.ProjM.l + vlbar.Ga[mu].dGLhzv.ProjM.vl +
467 uqbar.Ga[mu].dGRhzu.ProjP.uq + dqbar.Ga[mu].dGRhzd.ProjP.dq + lbar.Ga[mu].dGRhze.ProjP.l );
468 LZ + LW + HC[LW]
469];
470
471(* eq. (3.11) for the hvff dipole terms *)
472Lhdvff:=Block[{LG,LA,LZ,LW},
473 LG = gs FS[G,mu,nu,a] (uqbar.Sig[mu,nu].T[a].dhgu.uq + dqbar.Sig[mu,nu].T[a].dhgd.dq) +
474 gs Dual[FS][G,mu,nu,a] (uqbar.Sig[mu,nu].T[a].tdhgu.uq + dqbar.Sig[mu,nu].T[a].tdhgd.dq);
475 LA = ee FS[A,mu,nu] (uqbar.Sig[mu,nu].dhau.uq + dqbar.Sig[mu,nu].dhad.dq + lbar.Sig[mu,nu].dhae.l) +
476 ee Dual[FS][A,mu,nu] (uqbar.Sig[mu,nu].tdhau.uq + dqbar.Sig[mu,nu].tdhad.dq + lbar.Sig[mu,nu].tdhae.l);
477 LZ = Sqrt[gw^2+g1^2] FS[Z,mu,nu] (uqbar.Sig[mu,nu].dhzu.uq + dqbar.Sig[mu,nu].dhzd.dq + lbar.Sig[mu,nu].dhze.l) +
478 Sqrt[gw^2+g1^2] Dual[FS][Z,mu,nu] (uqbar.Sig[mu,nu].tdhzu.uq + dqbar.Sig[mu,nu].tdhzd.dq + lbar.Sig[mu,nu].tdhze.l);
479 LW = Sqrt[2] gw (FS[Wbar,mu,nu] dqbar.Sig[mu,nu].dhwq.uq + FS[W,mu,nu] vlbar.Sig[mu,nu].dhwl.l) +
480 Sqrt[2] gw Dual[FS][Wbar,mu,nu] dqbar.Sig[mu,nu].tdhwq.uq;
481 -H/(4 vev^2) (LG+LA+LZ+LW+HC[LW])
482];
483
484(* eq.(3.12) for the Higgs self interactions *)
485Lhself := -dL3 vev H^3 - dL4 H^4;
486
487(* eq (3.13) for the diHiggs couplings *)
488Lhh := Block[{Lvv,Lff},
489 Lvv = dCw2 gw^2 Wbar[mu] W[mu] + dCz2 Sqrt[g1^2+gw^2]/2 Z[mu] Z[mu] +
490 gs^2/8 Cgg2 FS[G,mu,nu,a] FS[G,mu,nu,a] + gs^2/8 tCgg2 FS[G,mu,nu,a] Dual[FS][G,mu,nu,a] +
491 gw^2/4 Cww2 FS[Wbar,mu,nu] FS[W,mu,nu] + gw^2/4 tCww2 FS[Wbar,mu,nu] Dual[FS][W,mu,nu] +
492 ee^2/8 Caa2 FS[A,mu,nu] FS[A,mu,nu] + ee^2/8 tCaa2 FS[A,mu,nu] Dual[FS][A,mu,nu] +
493 gw g1/4 Cza2 FS[Z,mu,nu] FS[A,mu,nu] + gw g1/4 tCza2 FS[Z,mu,nu] Dual[FS][A,mu,nu] +
494 (gw^2+g1^2)/8 Czz2 FS[Z,mu,nu] FS[Z,mu,nu] + (gw^2 + g1^2)/8 tCzz2 FS[Z,mu,nu] Dual[FS][Z,mu,nu] -
495 gw^2 Cwbx2/2 (Wbar[mu] del[FS[W,mu,nu],nu] + W[mu] del[FS[Wbar,mu,nu],nu]) -
496 gw^2 Cabx2/2 Z[mu] del[FS[A,mu,nu],nu] -
497 gw^2 Czbx2/2 Z[mu] del[FS[Z,mu,nu],nu];
498 Lff = -ExpandIndices[Plus@@Flatten[Table[Sqrt[Mu[ff] Mu[ffp]]/2 dYu2[ff,ffp] ProjM[sp1,sp2] uqbar[sp1,ff,cc].uq[sp2,ffp,cc], {ffp,1,3},{ff,1,3}]]] -
499 ExpandIndices[Plus@@Flatten[Table[Sqrt[Md[ff] Md[ffp]]/2 dYd2[ff,ffp] ProjM[sp1,sp2] dqbar[sp1,ff,cc].dq[sp2,ffp,cc], {ffp,1,3},{ff,1,3}]]] -
500 ExpandIndices[Plus@@Flatten[Table[Sqrt[Ml[ff] Ml[ffp]]/2 dYe2[ff,ffp] ProjM[sp1,sp2] lbar[sp1,ff].l[sp2,ffp], {ffp,1,3},{ff,1,3}]]];
501 H^2/vev^2 ( Lvv + Lff + HC[Lff] )
502];
503
504(* LOther not included *)
505
506(* The sum of all contributions *)
507LMB:= {LMass, Lvertex, Ldip, Ltgc, Lqgc, Lh, Lhvff, Lhdvff, Lhself, Lhh};