# RSmodel: RS.nb

File RS.nb, 123.6 KB (added by PriscilaAquino, 8 years ago) |
---|

Line | |
---|---|

1 | (* Content-type: application/mathematica *) |

2 | |

3 | (*** Wolfram Notebook File ***) |

4 | (* http://www.wolfram.com/nb *) |

5 | |

6 | (* CreatedBy='Mathematica 6.0' *) |

7 | |

8 | (*CacheID: 234*) |

9 | (* Internal cache information: |

10 | NotebookFileLineBreakTest |

11 | NotebookFileLineBreakTest |

12 | NotebookDataPosition[ 145, 7] |

13 | NotebookDataLength[ 126358, 3580] |

14 | NotebookOptionsPosition[ 122628, 3452] |

15 | NotebookOutlinePosition[ 123061, 3471] |

16 | CellTagsIndexPosition[ 123018, 3468] |

17 | WindowFrame->Normal*) |

18 | |

19 | (* Beginning of Notebook Content *) |

20 | Notebook[{ |

21 | |

22 | Cell[CellGroupData[{ |

23 | Cell["The RS Model", "Title", |

24 | CellChangeTimes->{{3.405054966614888*^9, 3.4050549767315893`*^9}, |

25 | 3.4529230123333807`*^9, {3.45405649584802*^9, 3.4540564997867126`*^9}, { |

26 | 3.4540565705776033`*^9, 3.454056571055434*^9}, {3.454057181466007*^9, |

27 | 3.454057182797702*^9}, {3.50607859377206*^9, 3.5060785937981367`*^9}}], |

28 | |

29 | Cell[CellGroupData[{ |

30 | |

31 | Cell["Load of the FeynRules package", "Section", |

32 | CellChangeTimes->{{3.452856941348258*^9, 3.452856954182706*^9}}], |

33 | |

34 | Cell[BoxData[ |

35 | RowBox[{"Quit", "[", "]"}]], "Input", |

36 | CellChangeTimes->{{3.4521543016025457`*^9, 3.452154302750087*^9}}], |

37 | |

38 | Cell[CellGroupData[{ |

39 | |

40 | Cell[BoxData[{ |

41 | RowBox[{ |

42 | RowBox[{"$FeynRulesPath", "=", |

43 | RowBox[{"SetDirectory", "[", "\"\<PATH TO FEYNRULES\>\"", "]"}]}], |

44 | ";"}], "\[IndentingNewLine]", |

45 | RowBox[{"<<", "FeynRules`"}], "\[IndentingNewLine]", |

46 | RowBox[{ |

47 | RowBox[{"SetDirectory", "[", |

48 | RowBox[{"$FeynRulesPath", "<>", "\"\</Models\>\""}], "]"}], |

49 | ";"}]}], "Input", |

50 | CellChangeTimes->{{3.41265862251538*^9, 3.412658649947229*^9}, { |

51 | 3.423415585782702*^9, 3.423415597189939*^9}, {3.4234163173467493`*^9, |

52 | 3.4234163227881193`*^9}, {3.453613499780509*^9, 3.453613524557995*^9}, { |

53 | 3.454050520543564*^9, 3.454050533398179*^9}, {3.454056582682654*^9, |

54 | 3.4540565840807753`*^9}, {3.454061008970613*^9, 3.4540610300313797`*^9}, |

55 | 3.4540621439628963`*^9, {3.495340379593639*^9, 3.4953404218994904`*^9}, { |

56 | 3.495340458740946*^9, 3.495340470700296*^9}, {3.495346776441216*^9, |

57 | 3.495346778514391*^9}, {3.495346840109207*^9, 3.495346853955175*^9}, { |

58 | 3.495346989391107*^9, 3.4953470011326303`*^9}, {3.5515944004254293`*^9, |

59 | 3.551594406892641*^9}}], |

60 | |

61 | Cell[CellGroupData[{ |

62 | |

63 | Cell[BoxData[ |

64 | FormBox["\<\" - FeynRules - \"\>", TraditionalForm]], "Print", |

65 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

66 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

67 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

68 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

69 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

70 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

71 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

72 | 3.511150901313452*^9, 3.5515940742919283`*^9}], |

73 | |

74 | Cell[BoxData[ |

75 | FormBox[ |

76 | InterpretationBox[ |

77 | RowBox[{"\<\"Version: \"\>", "\[InvisibleSpace]", "\<\"1.7.50\"\>", |

78 | "\[InvisibleSpace]", |

79 | RowBox[{"\<\" (\"\>", " ", "\<\"07 July 2012\"\>"}], |

80 | "\[InvisibleSpace]", "\<\").\"\>"}], |

81 | SequenceForm["Version: ", "1.7.50", " (" "07 July 2012", ")."], |

82 | Editable->False], TraditionalForm]], "Print", |

83 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

84 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

85 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

86 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

87 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

88 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

89 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

90 | 3.511150901313452*^9, 3.551594074299384*^9}], |

91 | |

92 | Cell[BoxData[ |

93 | FormBox["\<\"Authors: C. Degrande, C. Duhr, N. Christensen, B. Fuks\"\>", |

94 | TraditionalForm]], "Print", |

95 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

96 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

97 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

98 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

99 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

100 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

101 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

102 | 3.511150901313452*^9, 3.5515940743030577`*^9}], |

103 | |

104 | Cell[BoxData[ |

105 | FormBox["\<\" \"\>", TraditionalForm]], "Print", |

106 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

107 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

108 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

109 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

110 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

111 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

112 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

113 | 3.511150901313452*^9, 3.5515940743061543`*^9}], |

114 | |

115 | Cell[BoxData[ |

116 | FormBox["\<\"Please cite: Comput.Phys.Commun.180:1614-1641,2009 \ |

117 | (arXiv:0806.4194).\"\>", TraditionalForm]], "Print", |

118 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

119 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

120 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

121 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

122 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

123 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

124 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

125 | 3.511150901313452*^9, 3.551594074309434*^9}], |

126 | |

127 | Cell[BoxData[ |

128 | FormBox["\<\"http://feynrules.phys.ucl.ac.be\"\>", TraditionalForm]], "Print",\ |

129 | |

130 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

131 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

132 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

133 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

134 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

135 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

136 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

137 | 3.511150901313452*^9, 3.5515940743131227`*^9}], |

138 | |

139 | Cell[BoxData[ |

140 | FormBox["\<\" \"\>", TraditionalForm]], "Print", |

141 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

142 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

143 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

144 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

145 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

146 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

147 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

148 | 3.511150901313452*^9, 3.551594074316382*^9}], |

149 | |

150 | Cell[BoxData[ |

151 | FormBox["\<\"The FeynRules palette can be opened using the command \ |

152 | FRPalette[].\"\>", TraditionalForm]], "Print", |

153 | CellChangeTimes->{3.510484752611849*^9, 3.510485034105152*^9, |

154 | 3.5105494433649282`*^9, 3.510549675693986*^9, 3.510549881729115*^9, |

155 | 3.510550098314848*^9, 3.51055028371528*^9, 3.510550492042159*^9, |

156 | 3.5107748084065847`*^9, 3.510896838467969*^9, 3.510908074669107*^9, |

157 | 3.5109087140073547`*^9, 3.510909251755891*^9, 3.510909510721971*^9, |

158 | 3.5109099636626*^9, 3.51091032067474*^9, 3.510921436884139*^9, |

159 | 3.510996893938015*^9, 3.511008483564971*^9, 3.511072017849297*^9, |

160 | 3.511150901313452*^9, 3.551594074319989*^9}] |

161 | }, Open ]] |

162 | }, Open ]] |

163 | }, Open ]], |

164 | |

165 | Cell[CellGroupData[{ |

166 | |

167 | Cell["Load of the full LED model", "Section", |

168 | CellChangeTimes->{{3.452856959806845*^9, 3.452856965627877*^9}, { |

169 | 3.454050557859632*^9, 3.454050559388439*^9}, {3.454062198742198*^9, |

170 | 3.454062202491016*^9}}], |

171 | |

172 | Cell[CellGroupData[{ |

173 | |

174 | Cell[BoxData[ |

175 | RowBox[{"LoadModel", "[", "\"\<RS.fr\>\"", "]"}]], "Input", |

176 | CellChangeTimes->{{3.402749737680746*^9, 3.4027497378335543`*^9}, |

177 | 3.405009528824724*^9, 3.449909327040394*^9, 3.452152811321804*^9, |

178 | 3.4529230123338823`*^9, 3.45405650276263*^9, {3.5052226609868517`*^9, |

179 | 3.5052226622426157`*^9}, {3.5052228699826508`*^9, |

180 | 3.5052228711474533`*^9}, {3.505223019960236*^9, 3.505223020959083*^9}}], |

181 | |

182 | Cell[CellGroupData[{ |

183 | |

184 | Cell[BoxData[ |

185 | FormBox["\<\"This model implementation was created by\"\>", |

186 | TraditionalForm]], "Print", |

187 | CellChangeTimes->{ |

188 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

189 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

190 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

191 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

192 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

193 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

194 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

195 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

196 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

197 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

198 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

199 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

200 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

201 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

202 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

203 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

204 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

205 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

206 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

207 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

208 | 3.551594075401444*^9}], |

209 | |

210 | Cell[BoxData[ |

211 | FormBox["\<\"Priscila de Aquino\"\>", TraditionalForm]], "Print", |

212 | CellChangeTimes->{ |

213 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

214 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

215 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

216 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

217 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

218 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

219 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

220 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

221 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

222 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

223 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

224 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

225 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

226 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

227 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

228 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

229 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

230 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

231 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

232 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

233 | 3.551594075473151*^9}], |

234 | |

235 | Cell[BoxData[ |

236 | FormBox[ |

237 | InterpretationBox[ |

238 | RowBox[{"\<\"Model Version: \"\>", "\[InvisibleSpace]", "\<\"2.1\"\>"}], |

239 | SequenceForm["Model Version: ", "2.1"], |

240 | Editable->False], TraditionalForm]], "Print", |

241 | CellChangeTimes->{ |

242 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

243 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

244 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

245 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

246 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

247 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

248 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

249 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

250 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

251 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

252 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

253 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

254 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

255 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

256 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

257 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

258 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

259 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

260 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

261 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

262 | 3.551594075687133*^9}], |

263 | |

264 | Cell[BoxData[ |

265 | FormBox["\<\"For more information, type ModelInformation[].\"\>", |

266 | TraditionalForm]], "Print", |

267 | CellChangeTimes->{ |

268 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

269 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

270 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

271 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

272 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

273 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

274 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

275 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

276 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

277 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

278 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

279 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

280 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

281 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

282 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

283 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

284 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

285 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

286 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

287 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

288 | 3.551594075717417*^9}], |

289 | |

290 | Cell[BoxData[ |

291 | FormBox["\<\"\"\>", TraditionalForm]], "Print", |

292 | CellChangeTimes->{ |

293 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

294 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

295 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

296 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

297 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

298 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

299 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

300 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

301 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

302 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

303 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

304 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

305 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

306 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

307 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

308 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

309 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

310 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

311 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

312 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

313 | 3.551594075752928*^9}], |

314 | |

315 | Cell[BoxData[ |

316 | FormBox["\<\" - Loading particle classes.\"\>", TraditionalForm]], "Print",\ |

317 | |

318 | CellChangeTimes->{ |

319 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

320 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

321 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

322 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

323 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

324 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

325 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

326 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

327 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

328 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

329 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

330 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

331 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

332 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

333 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

334 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

335 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

336 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

337 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

338 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

339 | 3.551594075783638*^9}], |

340 | |

341 | Cell[BoxData[ |

342 | FormBox["\<\" - Loading gauge group classes.\"\>", |

343 | TraditionalForm]], "Print", |

344 | CellChangeTimes->{ |

345 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

346 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

347 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

348 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

349 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

350 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

351 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

352 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

353 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

354 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

355 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

356 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

357 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

358 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

359 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

360 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

361 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

362 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

363 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

364 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

365 | 3.5515940758209553`*^9}], |

366 | |

367 | Cell[BoxData[ |

368 | FormBox["\<\" - Loading parameter classes.\"\>", TraditionalForm]], "Print",\ |

369 | |

370 | CellChangeTimes->{ |

371 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

372 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

373 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

374 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

375 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

376 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

377 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

378 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

379 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

380 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

381 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

382 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

383 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

384 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

385 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

386 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

387 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

388 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

389 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

390 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

391 | 3.551594075857312*^9}], |

392 | |

393 | Cell[BoxData[ |

394 | FormBox[ |

395 | InterpretationBox[ |

396 | RowBox[{"\<\"\\nModel \"\>", "\[InvisibleSpace]", "\<\"RS\"\>", |

397 | "\[InvisibleSpace]", "\<\" loaded.\"\>"}], |

398 | SequenceForm["\nModel ", "RS", " loaded."], |

399 | Editable->False], TraditionalForm]], "Print", |

400 | CellChangeTimes->{ |

401 | 3.50866599762751*^9, 3.508666845577454*^9, 3.508668321500312*^9, |

402 | 3.508735610399456*^9, 3.508736476296989*^9, 3.508736765467557*^9, |

403 | 3.5087373565203857`*^9, 3.5087541049636393`*^9, 3.5087597508701153`*^9, |

404 | 3.50884139835351*^9, 3.5088426497431498`*^9, 3.508844283133127*^9, |

405 | 3.5088445210737877`*^9, 3.508849548668971*^9, 3.508849928790103*^9, |

406 | 3.509035692508004*^9, 3.509036039842061*^9, 3.509079897772564*^9, |

407 | 3.5090813557726173`*^9, 3.509081619074089*^9, 3.509085092118143*^9, |

408 | 3.5103909273405647`*^9, {3.5104001600938873`*^9, 3.510400162694624*^9}, |

409 | 3.510400355146824*^9, 3.5104004014134483`*^9, 3.510401161162257*^9, |

410 | 3.5104017247623672`*^9, 3.510402420445574*^9, 3.510462005095992*^9, |

411 | 3.510462564796801*^9, 3.510467153998857*^9, 3.510471049893095*^9, |

412 | 3.510474878937703*^9, 3.5104764238969793`*^9, 3.510477734006971*^9, |

413 | 3.510477914499457*^9, 3.510478150391626*^9, 3.5104837991334667`*^9, |

414 | 3.510484753822405*^9, 3.510485038703555*^9, 3.510549444002864*^9, |

415 | 3.5105496769923553`*^9, 3.510549882956607*^9, 3.510550100545282*^9, |

416 | 3.510550287980063*^9, 3.51055049269799*^9, 3.510774809447246*^9, |

417 | 3.5108968475367603`*^9, 3.510908075741026*^9, 3.510908714591831*^9, |

418 | 3.510909252669683*^9, 3.510909511306642*^9, 3.5109099642213507`*^9, |

419 | 3.5109103212601213`*^9, 3.510921439623987*^9, 3.510996896297347*^9, |

420 | 3.5110084846821404`*^9, 3.511072019559475*^9, 3.511150901883635*^9, |

421 | 3.551594075890205*^9}] |

422 | }, Open ]] |

423 | }, Open ]] |

424 | }, Open ]], |

425 | |

426 | Cell[CellGroupData[{ |

427 | |

428 | Cell["The full RS lagrangian", "Section", |

429 | CellChangeTimes->{{3.411910065227421*^9, 3.411910071535137*^9}, { |

430 | 3.4540507294896593`*^9, 3.4540507310208197`*^9}, {3.4540567139322166`*^9, |

431 | 3.454056718777896*^9}, {3.506078608080686*^9, 3.5060786082497253`*^9}}], |

432 | |

433 | Cell[CellGroupData[{ |

434 | |

435 | Cell["Gauge sector", "Subsubsection", |

436 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

437 | 3.454057138248085*^9, 3.454057139479412*^9}}], |

438 | |

439 | Cell[CellGroupData[{ |

440 | |

441 | Cell[BoxData["LagG"], "Input", |

442 | CellChangeTimes->{{3.411910181169772*^9, 3.411910184667088*^9}, { |

443 | 3.454050790694797*^9, 3.454050807408856*^9}, 3.454052286514977*^9, { |

444 | 3.454057086606534*^9, 3.4540570873864717`*^9}, 3.454061218230431*^9}], |

445 | |

446 | Cell[BoxData[ |

447 | FormBox[ |

448 | RowBox[{ |

449 | RowBox[{"-", |

450 | FractionBox["1", "2"]}], " ", |

451 | FormBox["\[Kappa]", |

452 | TraditionalForm], " ", |

453 | RowBox[{ |

454 | FormBox[ |

455 | SubscriptBox["h", |

456 | RowBox[{ |

457 | FormBox["\[Mu]", |

458 | TraditionalForm], ",", |

459 | FormBox["\[Nu]", |

460 | TraditionalForm]}]], |

461 | TraditionalForm], ".", |

462 | RowBox[{"(", |

463 | RowBox[{ |

464 | RowBox[{"-", |

465 | RowBox[{ |

466 | FormBox[ |

467 | SubscriptBox["\[Eta]", |

468 | RowBox[{ |

469 | FormBox[ |

470 | FormBox["\[Mu]", |

471 | TraditionalForm], |

472 | TraditionalForm], ",", |

473 | FormBox[ |

474 | FormBox["\[Nu]", |

475 | TraditionalForm], |

476 | TraditionalForm]}]], |

477 | TraditionalForm], ".", |

478 | RowBox[{"(", |

479 | RowBox[{ |

480 | RowBox[{"-", |

481 | RowBox[{ |

482 | FractionBox["1", "4"], " ", |

483 | RowBox[{"(", |

484 | RowBox[{ |

485 | RowBox[{ |

486 | FormBox[ |

487 | SubscriptBox["g", "s"], |

488 | TraditionalForm], " ", |

489 | FormBox[ |

490 | SubscriptBox["G", |

491 | RowBox[{ |

492 | FormBox["\[Rho]", |

493 | TraditionalForm], ",", "a2"}]], |

494 | TraditionalForm], " ", |

495 | FormBox[ |

496 | SubscriptBox["G", |

497 | RowBox[{"sig", ",", "a3"}]], |

498 | TraditionalForm], " ", |

499 | FormBox[ |

500 | SubscriptBox["f", |

501 | RowBox[{"a1", ",", "a2", ",", "a3"}]], |

502 | TraditionalForm]}], "-", |

503 | FormBox[ |

504 | RowBox[{ |

505 | SubscriptBox["\<\"\[PartialD]\"\>", "sig"], "(", |

506 | FormBox[ |

507 | SubscriptBox["G", |

508 | RowBox[{ |

509 | FormBox["\[Rho]", |

510 | TraditionalForm], ",", "a1"}]], |

511 | TraditionalForm], ")"}], |

512 | TraditionalForm], "+", |

513 | FormBox[ |

514 | RowBox[{ |

515 | SubscriptBox["\<\"\[PartialD]\"\>", |

516 | FormBox["\[Rho]", |

517 | TraditionalForm]], "(", |

518 | FormBox[ |

519 | SubscriptBox["G", |

520 | RowBox[{"sig", ",", "a1"}]], |

521 | TraditionalForm], ")"}], |

522 | TraditionalForm]}], ")"}], " ", |

523 | RowBox[{"(", |

524 | RowBox[{ |

525 | RowBox[{ |

526 | FormBox[ |

527 | SubscriptBox["g", "s"], |

528 | TraditionalForm], " ", |

529 | FormBox[ |

530 | SubscriptBox["G", |

531 | RowBox[{ |

532 | FormBox["\[Rho]", |

533 | TraditionalForm], ",", "a4"}]], |

534 | TraditionalForm], " ", |

535 | FormBox[ |

536 | SubscriptBox["G", |

537 | RowBox[{"sig", ",", "a5"}]], |

538 | TraditionalForm], " ", |

539 | FormBox[ |

540 | SubscriptBox["f", |

541 | RowBox[{"a1", ",", "a4", ",", "a5"}]], |

542 | TraditionalForm]}], "-", |

543 | FormBox[ |

544 | RowBox[{ |

545 | SubscriptBox["\<\"\[PartialD]\"\>", "sig"], "(", |

546 | FormBox[ |

547 | SubscriptBox["G", |

548 | RowBox[{ |

549 | FormBox["\[Rho]", |

550 | TraditionalForm], ",", "a1"}]], |

551 | TraditionalForm], ")"}], |

552 | TraditionalForm], "+", |

553 | FormBox[ |

554 | RowBox[{ |

555 | SubscriptBox["\<\"\[PartialD]\"\>", |

556 | FormBox["\[Rho]", |

557 | TraditionalForm]], "(", |

558 | FormBox[ |

559 | SubscriptBox["G", |

560 | RowBox[{"sig", ",", "a1"}]], |

561 | TraditionalForm], ")"}], |

562 | TraditionalForm]}], ")"}]}]}], "-", |

563 | RowBox[{ |

564 | FractionBox["1", "4"], " ", |

565 | RowBox[{"(", |

566 | RowBox[{ |

567 | FractionBox[ |

568 | RowBox[{ |

569 | FormBox["e", |

570 | TraditionalForm], " ", |

571 | FormBox[ |

572 | SubscriptBox["Wi", |

573 | RowBox[{ |

574 | FormBox["\[Rho]", |

575 | TraditionalForm], ",", "i2"}]], |

576 | TraditionalForm], " ", |

577 | FormBox[ |

578 | SubscriptBox["Wi", |

579 | RowBox[{"sig", ",", "i3"}]], |

580 | TraditionalForm], " ", |

581 | FormBox[ |

582 | SubscriptBox["\[Epsilon]", |

583 | RowBox[{"i1", ",", "i2", ",", "i3"}]], |

584 | TraditionalForm]}], |

585 | FormBox[ |

586 | SubscriptBox["s", "w"], |

587 | TraditionalForm]], "-", |

588 | FormBox[ |

589 | RowBox[{ |

590 | SubscriptBox["\<\"\[PartialD]\"\>", "sig"], "(", |

591 | FormBox[ |

592 | SubscriptBox["Wi", |

593 | RowBox[{ |

594 | FormBox["\[Rho]", |

595 | TraditionalForm], ",", "i1"}]], |

596 | TraditionalForm], ")"}], |

597 | TraditionalForm], "+", |

598 | FormBox[ |

599 | RowBox[{ |

600 | SubscriptBox["\<\"\[PartialD]\"\>", |

601 | FormBox["\[Rho]", |

602 | TraditionalForm]], "(", |

603 | FormBox[ |

604 | SubscriptBox["Wi", |

605 | RowBox[{"sig", ",", "i1"}]], |

606 | TraditionalForm], ")"}], |

607 | TraditionalForm]}], ")"}], " ", |

608 | RowBox[{"(", |

609 | RowBox[{ |

610 | FractionBox[ |

611 | RowBox[{ |

612 | FormBox["e", |

613 | TraditionalForm], " ", |

614 | FormBox[ |

615 | SubscriptBox["Wi", |

616 | RowBox[{ |

617 | FormBox["\[Rho]", |

618 | TraditionalForm], ",", "i4"}]], |

619 | TraditionalForm], " ", |

620 | FormBox[ |

621 | SubscriptBox["Wi", |

622 | RowBox[{"sig", ",", "i5"}]], |

623 | TraditionalForm], " ", |

624 | FormBox[ |

625 | SubscriptBox["\[Epsilon]", |

626 | RowBox[{"i1", ",", "i4", ",", "i5"}]], |

627 | TraditionalForm]}], |

628 | FormBox[ |

629 | SubscriptBox["s", "w"], |

630 | TraditionalForm]], "-", |

631 | FormBox[ |

632 | RowBox[{ |

633 | SubscriptBox["\<\"\[PartialD]\"\>", "sig"], "(", |

634 | FormBox[ |

635 | SubscriptBox["Wi", |

636 | RowBox[{ |

637 | FormBox["\[Rho]", |

638 | TraditionalForm], ",", "i1"}]], |

639 | TraditionalForm], ")"}], |

640 | TraditionalForm], "+", |

641 | FormBox[ |

642 | RowBox[{ |

643 | SubscriptBox["\<\"\[PartialD]\"\>", |

644 | FormBox["\[Rho]", |

645 | TraditionalForm]], "(", |

646 | FormBox[ |

647 | SubscriptBox["Wi", |

648 | RowBox[{"sig", ",", "i1"}]], |

649 | TraditionalForm], ")"}], |

650 | TraditionalForm]}], ")"}]}], "-", |

651 | RowBox[{ |

652 | FractionBox["1", "4"], " ", |

653 | SuperscriptBox[ |

654 | RowBox[{"(", |

655 | RowBox[{ |

656 | FormBox[ |

657 | RowBox[{ |

658 | SubscriptBox["\<\"\[PartialD]\"\>", |

659 | FormBox["\[Rho]", |

660 | TraditionalForm]], "(", |

661 | FormBox[ |

662 | SubscriptBox["B", "sig"], |

663 | TraditionalForm], ")"}], |

664 | TraditionalForm], "-", |

665 | FormBox[ |

666 | RowBox[{ |

667 | SubscriptBox["\<\"\[PartialD]\"\>", "sig"], "(", |

668 | FormBox[ |

669 | SubscriptBox["B", |

670 | FormBox["\[Rho]", |

671 | TraditionalForm]], |

672 | TraditionalForm], ")"}], |

673 | TraditionalForm]}], ")"}], "2"]}]}], ")"}]}]}], "-", |

674 | RowBox[{ |

675 | RowBox[{"(", |

676 | RowBox[{ |

677 | RowBox[{ |

678 | FormBox[ |

679 | SubscriptBox["g", "s"], |

680 | TraditionalForm], " ", |

681 | FormBox[ |

682 | SubscriptBox["G", |

683 | RowBox[{ |

684 | FormBox["\[Mu]", |

685 | TraditionalForm], ",", "a2"}]], |

686 | TraditionalForm], " ", |

687 | FormBox[ |

688 | SubscriptBox["G", |

689 | RowBox[{ |

690 | FormBox["\[Rho]", |

691 | TraditionalForm], ",", "a3"}]], |

692 | TraditionalForm], " ", |

693 | FormBox[ |

694 | SubscriptBox["f", |

695 | RowBox[{"a1", ",", "a2", ",", "a3"}]], |

696 | TraditionalForm]}], "-", |

697 | FormBox[ |

698 | RowBox[{ |

699 | SubscriptBox["\<\"\[PartialD]\"\>", |

700 | FormBox["\[Rho]", |

701 | TraditionalForm]], "(", |

702 | FormBox[ |

703 | SubscriptBox["G", |

704 | RowBox[{ |

705 | FormBox["\[Mu]", |

706 | TraditionalForm], ",", "a1"}]], |

707 | TraditionalForm], ")"}], |

708 | TraditionalForm], "+", |

709 | FormBox[ |

710 | RowBox[{ |

711 | SubscriptBox["\<\"\[PartialD]\"\>", |

712 | FormBox["\[Mu]", |

713 | TraditionalForm]], "(", |

714 | FormBox[ |

715 | SubscriptBox["G", |

716 | RowBox[{ |

717 | FormBox["\[Rho]", |

718 | TraditionalForm], ",", "a1"}]], |

719 | TraditionalForm], ")"}], |

720 | TraditionalForm]}], ")"}], " ", |

721 | RowBox[{"(", |

722 | RowBox[{ |

723 | RowBox[{ |

724 | FormBox[ |

725 | SubscriptBox["g", "s"], |

726 | TraditionalForm], " ", |

727 | FormBox[ |

728 | SubscriptBox["G", |

729 | RowBox[{ |

730 | FormBox["\[Nu]", |

731 | TraditionalForm], ",", "a2"}]], |

732 | TraditionalForm], " ", |

733 | FormBox[ |

734 | SubscriptBox["G", |

735 | RowBox[{ |

736 | FormBox["\[Rho]", |

737 | TraditionalForm], ",", "a3"}]], |

738 | TraditionalForm], " ", |

739 | FormBox[ |

740 | SubscriptBox["f", |

741 | RowBox[{"a1", ",", "a2", ",", "a3"}]], |

742 | TraditionalForm]}], "-", |

743 | FormBox[ |

744 | RowBox[{ |

745 | SubscriptBox["\<\"\[PartialD]\"\>", |

746 | FormBox["\[Rho]", |

747 | TraditionalForm]], "(", |

748 | FormBox[ |

749 | SubscriptBox["G", |

750 | RowBox[{ |

751 | FormBox["\[Nu]", |

752 | TraditionalForm], ",", "a1"}]], |

753 | TraditionalForm], ")"}], |

754 | TraditionalForm], "+", |

755 | FormBox[ |

756 | RowBox[{ |

757 | SubscriptBox["\<\"\[PartialD]\"\>", |

758 | FormBox["\[Nu]", |

759 | TraditionalForm]], "(", |

760 | FormBox[ |

761 | SubscriptBox["G", |

762 | RowBox[{ |

763 | FormBox["\[Rho]", |

764 | TraditionalForm], ",", "a1"}]], |

765 | TraditionalForm], ")"}], |

766 | TraditionalForm]}], ")"}]}], "-", |

767 | RowBox[{ |

768 | RowBox[{"(", |

769 | RowBox[{ |

770 | FractionBox[ |

771 | RowBox[{ |

772 | FormBox["e", |

773 | TraditionalForm], " ", |

774 | FormBox[ |

775 | SubscriptBox["Wi", |

776 | RowBox[{ |

777 | FormBox["\[Mu]", |

778 | TraditionalForm], ",", "i2"}]], |

779 | TraditionalForm], " ", |

780 | FormBox[ |

781 | SubscriptBox["Wi", |

782 | RowBox[{ |

783 | FormBox["\[Rho]", |

784 | TraditionalForm], ",", "i3"}]], |

785 | TraditionalForm], " ", |

786 | FormBox[ |

787 | SubscriptBox["\[Epsilon]", |

788 | RowBox[{"i1", ",", "i2", ",", "i3"}]], |

789 | TraditionalForm]}], |

790 | FormBox[ |

791 | SubscriptBox["s", "w"], |

792 | TraditionalForm]], "-", |

793 | FormBox[ |

794 | RowBox[{ |

795 | SubscriptBox["\<\"\[PartialD]\"\>", |

796 | FormBox["\[Rho]", |

797 | TraditionalForm]], "(", |

798 | FormBox[ |

799 | SubscriptBox["Wi", |

800 | RowBox[{ |

801 | FormBox["\[Mu]", |

802 | TraditionalForm], ",", "i1"}]], |

803 | TraditionalForm], ")"}], |

804 | TraditionalForm], "+", |

805 | FormBox[ |

806 | RowBox[{ |

807 | SubscriptBox["\<\"\[PartialD]\"\>", |

808 | FormBox["\[Mu]", |

809 | TraditionalForm]], "(", |

810 | FormBox[ |

811 | SubscriptBox["Wi", |

812 | RowBox[{ |

813 | FormBox["\[Rho]", |

814 | TraditionalForm], ",", "i1"}]], |

815 | TraditionalForm], ")"}], |

816 | TraditionalForm]}], ")"}], " ", |

817 | RowBox[{"(", |

818 | RowBox[{ |

819 | FractionBox[ |

820 | RowBox[{ |

821 | FormBox["e", |

822 | TraditionalForm], " ", |

823 | FormBox[ |

824 | SubscriptBox["Wi", |

825 | RowBox[{ |

826 | FormBox["\[Nu]", |

827 | TraditionalForm], ",", "i4"}]], |

828 | TraditionalForm], " ", |

829 | FormBox[ |

830 | SubscriptBox["Wi", |

831 | RowBox[{ |

832 | FormBox["\[Rho]", |

833 | TraditionalForm], ",", "i5"}]], |

834 | TraditionalForm], " ", |

835 | FormBox[ |

836 | SubscriptBox["\[Epsilon]", |

837 | RowBox[{"i1", ",", "i4", ",", "i5"}]], |

838 | TraditionalForm]}], |

839 | FormBox[ |

840 | SubscriptBox["s", "w"], |

841 | TraditionalForm]], "-", |

842 | FormBox[ |

843 | RowBox[{ |

844 | SubscriptBox["\<\"\[PartialD]\"\>", |

845 | FormBox["\[Rho]", |

846 | TraditionalForm]], "(", |

847 | FormBox[ |

848 | SubscriptBox["Wi", |

849 | RowBox[{ |

850 | FormBox["\[Nu]", |

851 | TraditionalForm], ",", "i1"}]], |

852 | TraditionalForm], ")"}], |

853 | TraditionalForm], "+", |

854 | FormBox[ |

855 | RowBox[{ |

856 | SubscriptBox["\<\"\[PartialD]\"\>", |

857 | FormBox["\[Nu]", |

858 | TraditionalForm]], "(", |

859 | FormBox[ |

860 | SubscriptBox["Wi", |

861 | RowBox[{ |

862 | FormBox["\[Rho]", |

863 | TraditionalForm], ",", "i1"}]], |

864 | TraditionalForm], ")"}], |

865 | TraditionalForm]}], ")"}]}], "-", |

866 | RowBox[{ |

867 | RowBox[{"(", |

868 | RowBox[{ |

869 | FormBox[ |

870 | RowBox[{ |

871 | SubscriptBox["\<\"\[PartialD]\"\>", |

872 | FormBox["\[Mu]", |

873 | TraditionalForm]], "(", |

874 | FormBox[ |

875 | SubscriptBox["B", |

876 | FormBox["\[Rho]", |

877 | TraditionalForm]], |

878 | TraditionalForm], ")"}], |

879 | TraditionalForm], "-", |

880 | FormBox[ |

881 | RowBox[{ |

882 | SubscriptBox["\<\"\[PartialD]\"\>", |

883 | FormBox["\[Rho]", |

884 | TraditionalForm]], "(", |

885 | FormBox[ |

886 | SubscriptBox["B", |

887 | FormBox["\[Mu]", |

888 | TraditionalForm]], |

889 | TraditionalForm], ")"}], |

890 | TraditionalForm]}], ")"}], " ", |

891 | RowBox[{"(", |

892 | RowBox[{ |

893 | FormBox[ |

894 | RowBox[{ |

895 | SubscriptBox["\<\"\[PartialD]\"\>", |

896 | FormBox["\[Nu]", |

897 | TraditionalForm]], "(", |

898 | FormBox[ |

899 | SubscriptBox["B", |

900 | FormBox["\[Rho]", |

901 | TraditionalForm]], |

902 | TraditionalForm], ")"}], |

903 | TraditionalForm], "-", |

904 | FormBox[ |

905 | RowBox[{ |

906 | SubscriptBox["\<\"\[PartialD]\"\>", |

907 | FormBox["\[Rho]", |

908 | TraditionalForm]], "(", |

909 | FormBox[ |

910 | SubscriptBox["B", |

911 | FormBox["\[Nu]", |

912 | TraditionalForm]], |

913 | TraditionalForm], ")"}], |

914 | TraditionalForm]}], ")"}]}]}], ")"}]}]}], |

915 | TraditionalForm]], "Output", |

916 | CellChangeTimes->{3.4540612188923187`*^9, 3.4953404870443583`*^9, |

917 | 3.495346918275885*^9, 3.4953470351248198`*^9}] |

918 | }, Open ]] |

919 | }, Open ]], |

920 | |

921 | Cell[CellGroupData[{ |

922 | |

923 | Cell["Scalar sector", "Subsubsection", |

924 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

925 | 3.411910274288354*^9, 3.41191027703699*^9}}], |

926 | |

927 | Cell[CellGroupData[{ |

928 | |

929 | Cell[BoxData["LagH"], "Input", |

930 | CellChangeTimes->{{3.411910181169772*^9, 3.411910184667088*^9}, { |

931 | 3.411910290186841*^9, 3.411910292005392*^9}, 3.454052293282386*^9, { |

932 | 3.454057094128326*^9, 3.454057094642251*^9}, 3.45406122079182*^9}], |

933 | |

934 | Cell[BoxData[ |

935 | FormBox[ |

936 | RowBox[{ |

937 | RowBox[{"-", |

938 | FractionBox["1", "2"]}], " ", |

939 | FormBox["\[Kappa]", |

940 | TraditionalForm], " ", |

941 | RowBox[{ |

942 | FormBox[ |

943 | SubscriptBox["h", |

944 | RowBox[{ |

945 | FormBox["\[Mu]", |

946 | TraditionalForm], ",", |

947 | FormBox["\[Nu]", |

948 | TraditionalForm]}]], |

949 | TraditionalForm], ".", |

950 | RowBox[{"(", |

951 | RowBox[{ |

952 | RowBox[{"-", |

953 | RowBox[{ |

954 | FormBox[ |

955 | SubscriptBox["\[Eta]", |

956 | RowBox[{ |

957 | FormBox[ |

958 | FormBox["\[Mu]", |

959 | TraditionalForm], |

960 | TraditionalForm], ",", |

961 | FormBox[ |

962 | FormBox["\[Nu]", |

963 | TraditionalForm], |

964 | TraditionalForm]}]], |

965 | TraditionalForm], ".", |

966 | RowBox[{"(", |

967 | RowBox[{ |

968 | RowBox[{ |

969 | RowBox[{"(", |

970 | RowBox[{ |

971 | RowBox[{"-", |

972 | FractionBox[ |

973 | RowBox[{ |

974 | FormBox["e", |

975 | TraditionalForm], " ", |

976 | RowBox[{"(", |

977 | RowBox[{"H", "+", "v"}], ")"}], " ", |

978 | FormBox[ |

979 | SubscriptBox["Wi", |

980 | RowBox[{ |

981 | FormBox["\[Rho]", |

982 | TraditionalForm], ",", "3"}]], |

983 | TraditionalForm]}], |

984 | RowBox[{"2", " ", |

985 | SqrtBox["2"], " ", |

986 | FormBox[ |

987 | SubscriptBox["s", "w"], |

988 | TraditionalForm]}]]}], "+", |

989 | FractionBox[ |

990 | RowBox[{ |

991 | FormBox["e", |

992 | TraditionalForm], " ", |

993 | FormBox[ |

994 | SubscriptBox["B", |

995 | FormBox["\[Rho]", |

996 | TraditionalForm]], |

997 | TraditionalForm], " ", |

998 | RowBox[{"(", |

999 | RowBox[{"H", "+", "v"}], ")"}]}], |

1000 | RowBox[{"2", " ", |

1001 | SqrtBox["2"], " ", |

1002 | FormBox[ |

1003 | SubscriptBox["c", "w"], |

1004 | TraditionalForm]}]], "-", |

1005 | FractionBox[ |

1006 | RowBox[{"\[ImaginaryI]", " ", |

1007 | FormBox[ |

1008 | RowBox[{ |

1009 | SubscriptBox["\<\"\[PartialD]\"\>", |

1010 | FormBox["\[Rho]", |

1011 | TraditionalForm]], "(", "H", ")"}], |

1012 | TraditionalForm]}], |

1013 | SqrtBox["2"]]}], ")"}], " ", |

1014 | RowBox[{"(", |

1015 | RowBox[{ |

1016 | RowBox[{"-", |

1017 | FractionBox[ |

1018 | RowBox[{ |

1019 | FormBox["e", |

1020 | TraditionalForm], " ", |

1021 | RowBox[{"(", |

1022 | RowBox[{"H", "+", "v"}], ")"}], " ", |

1023 | FormBox[ |

1024 | SubscriptBox["Wi", |

1025 | RowBox[{ |

1026 | FormBox["\[Rho]", |

1027 | TraditionalForm], ",", "3"}]], |

1028 | TraditionalForm]}], |

1029 | RowBox[{"2", " ", |

1030 | SqrtBox["2"], " ", |

1031 | FormBox[ |

1032 | SubscriptBox["s", "w"], |

1033 | TraditionalForm]}]]}], "+", |

1034 | FractionBox[ |

1035 | RowBox[{ |

1036 | FormBox["e", |

1037 | TraditionalForm], " ", |

1038 | FormBox[ |

1039 | SubscriptBox["B", |

1040 | FormBox["\[Rho]", |

1041 | TraditionalForm]], |

1042 | TraditionalForm], " ", |

1043 | RowBox[{"(", |

1044 | RowBox[{"H", "+", "v"}], ")"}]}], |

1045 | RowBox[{"2", " ", |

1046 | SqrtBox["2"], " ", |

1047 | FormBox[ |

1048 | SubscriptBox["c", "w"], |

1049 | TraditionalForm]}]], "+", |

1050 | FractionBox[ |

1051 | RowBox[{"\[ImaginaryI]", " ", |

1052 | FormBox[ |

1053 | RowBox[{ |

1054 | SubscriptBox["\<\"\[PartialD]\"\>", |

1055 | FormBox["\[Rho]", |

1056 | TraditionalForm]], "(", "H", ")"}], |

1057 | TraditionalForm]}], |

1058 | SqrtBox["2"]]}], ")"}]}], "+", |

1059 | FractionBox[ |

1060 | RowBox[{ |

1061 | SuperscriptBox[ |

1062 | FormBox["e", |

1063 | TraditionalForm], "2"], " ", |

1064 | SuperscriptBox[ |

1065 | RowBox[{"(", |

1066 | RowBox[{"H", "+", "v"}], ")"}], "2"], " ", |

1067 | RowBox[{"(", |

1068 | RowBox[{ |

1069 | FormBox[ |

1070 | SubscriptBox["Wi", |

1071 | RowBox[{ |

1072 | FormBox["\[Rho]", |

1073 | TraditionalForm], ",", "1"}]], |

1074 | TraditionalForm], "-", |

1075 | RowBox[{"\[ImaginaryI]", " ", |

1076 | FormBox[ |

1077 | SubscriptBox["Wi", |

1078 | RowBox[{ |

1079 | FormBox["\[Rho]", |

1080 | TraditionalForm], ",", "2"}]], |

1081 | TraditionalForm]}]}], ")"}], " ", |

1082 | RowBox[{"(", |

1083 | RowBox[{ |

1084 | FormBox[ |

1085 | SubscriptBox["Wi", |

1086 | RowBox[{ |

1087 | FormBox["\[Rho]", |

1088 | TraditionalForm], ",", "1"}]], |

1089 | TraditionalForm], "+", |

1090 | RowBox[{"\[ImaginaryI]", " ", |

1091 | FormBox[ |

1092 | SubscriptBox["Wi", |

1093 | RowBox[{ |

1094 | FormBox["\[Rho]", |

1095 | TraditionalForm], ",", "2"}]], |

1096 | TraditionalForm]}]}], ")"}]}], |

1097 | RowBox[{"8", " ", |

1098 | SuperscriptBox[ |

1099 | FormBox[ |

1100 | SubscriptBox["s", "w"], |

1101 | TraditionalForm], "2"]}]]}], ")"}]}]}], "+", |

1102 | RowBox[{ |

1103 | RowBox[{"(", |

1104 | RowBox[{ |

1105 | RowBox[{"-", |

1106 | FractionBox[ |

1107 | RowBox[{ |

1108 | FormBox["e", |

1109 | TraditionalForm], " ", |

1110 | RowBox[{"(", |

1111 | RowBox[{"H", "+", "v"}], ")"}], " ", |

1112 | FormBox[ |

1113 | SubscriptBox["Wi", |

1114 | RowBox[{ |

1115 | FormBox["\[Mu]", |

1116 | TraditionalForm], ",", "3"}]], |

1117 | TraditionalForm]}], |

1118 | RowBox[{"2", " ", |

1119 | SqrtBox["2"], " ", |

1120 | FormBox[ |

1121 | SubscriptBox["s", "w"], |

1122 | TraditionalForm]}]]}], "+", |

1123 | FractionBox[ |

1124 | RowBox[{ |

1125 | FormBox["e", |

1126 | TraditionalForm], " ", |

1127 | FormBox[ |

1128 | SubscriptBox["B", |

1129 | FormBox["\[Mu]", |

1130 | TraditionalForm]], |

1131 | TraditionalForm], " ", |

1132 | RowBox[{"(", |

1133 | RowBox[{"H", "+", "v"}], ")"}]}], |

1134 | RowBox[{"2", " ", |

1135 | SqrtBox["2"], " ", |

1136 | FormBox[ |

1137 | SubscriptBox["c", "w"], |

1138 | TraditionalForm]}]], "+", |

1139 | FractionBox[ |

1140 | RowBox[{"\[ImaginaryI]", " ", |

1141 | FormBox[ |

1142 | RowBox[{ |

1143 | SubscriptBox["\<\"\[PartialD]\"\>", |

1144 | FormBox["\[Mu]", |

1145 | TraditionalForm]], "(", "H", ")"}], |

1146 | TraditionalForm]}], |

1147 | SqrtBox["2"]]}], ")"}], " ", |

1148 | RowBox[{"(", |

1149 | RowBox[{ |

1150 | RowBox[{"-", |

1151 | FractionBox[ |

1152 | RowBox[{ |

1153 | FormBox["e", |

1154 | TraditionalForm], " ", |

1155 | RowBox[{"(", |

1156 | RowBox[{"H", "+", "v"}], ")"}], " ", |

1157 | FormBox[ |

1158 | SubscriptBox["Wi", |

1159 | RowBox[{ |

1160 | FormBox["\[Nu]", |

1161 | TraditionalForm], ",", "3"}]], |

1162 | TraditionalForm]}], |

1163 | RowBox[{"2", " ", |

1164 | SqrtBox["2"], " ", |

1165 | FormBox[ |

1166 | SubscriptBox["s", "w"], |

1167 | TraditionalForm]}]]}], "+", |

1168 | FractionBox[ |

1169 | RowBox[{ |

1170 | FormBox["e", |

1171 | TraditionalForm], " ", |

1172 | FormBox[ |

1173 | SubscriptBox["B", |

1174 | FormBox["\[Nu]", |

1175 | TraditionalForm]], |

1176 | TraditionalForm], " ", |

1177 | RowBox[{"(", |

1178 | RowBox[{"H", "+", "v"}], ")"}]}], |

1179 | RowBox[{"2", " ", |

1180 | SqrtBox["2"], " ", |

1181 | FormBox[ |

1182 | SubscriptBox["c", "w"], |

1183 | TraditionalForm]}]], "-", |

1184 | FractionBox[ |

1185 | RowBox[{"\[ImaginaryI]", " ", |

1186 | FormBox[ |

1187 | RowBox[{ |

1188 | SubscriptBox["\<\"\[PartialD]\"\>", |

1189 | FormBox["\[Nu]", |

1190 | TraditionalForm]], "(", "H", ")"}], |

1191 | TraditionalForm]}], |

1192 | SqrtBox["2"]]}], ")"}]}], "+", |

1193 | RowBox[{ |

1194 | RowBox[{"(", |

1195 | RowBox[{ |

1196 | RowBox[{"-", |

1197 | FractionBox[ |

1198 | RowBox[{ |

1199 | FormBox["e", |

1200 | TraditionalForm], " ", |

1201 | RowBox[{"(", |

1202 | RowBox[{"H", "+", "v"}], ")"}], " ", |

1203 | FormBox[ |

1204 | SubscriptBox["Wi", |

1205 | RowBox[{ |

1206 | FormBox["\[Mu]", |

1207 | TraditionalForm], ",", "3"}]], |

1208 | TraditionalForm]}], |

1209 | RowBox[{"2", " ", |

1210 | SqrtBox["2"], " ", |

1211 | FormBox[ |

1212 | SubscriptBox["s", "w"], |

1213 | TraditionalForm]}]]}], "+", |

1214 | FractionBox[ |

1215 | RowBox[{ |

1216 | FormBox["e", |

1217 | TraditionalForm], " ", |

1218 | FormBox[ |

1219 | SubscriptBox["B", |

1220 | FormBox["\[Mu]", |

1221 | TraditionalForm]], |

1222 | TraditionalForm], " ", |

1223 | RowBox[{"(", |

1224 | RowBox[{"H", "+", "v"}], ")"}]}], |

1225 | RowBox[{"2", " ", |

1226 | SqrtBox["2"], " ", |

1227 | FormBox[ |

1228 | SubscriptBox["c", "w"], |

1229 | TraditionalForm]}]], "-", |

1230 | FractionBox[ |

1231 | RowBox[{"\[ImaginaryI]", " ", |

1232 | FormBox[ |

1233 | RowBox[{ |

1234 | SubscriptBox["\<\"\[PartialD]\"\>", |

1235 | FormBox["\[Mu]", |

1236 | TraditionalForm]], "(", "H", ")"}], |

1237 | TraditionalForm]}], |

1238 | SqrtBox["2"]]}], ")"}], " ", |

1239 | RowBox[{"(", |

1240 | RowBox[{ |

1241 | RowBox[{"-", |

1242 | FractionBox[ |

1243 | RowBox[{ |

1244 | FormBox["e", |

1245 | TraditionalForm], " ", |

1246 | RowBox[{"(", |

1247 | RowBox[{"H", "+", "v"}], ")"}], " ", |

1248 | FormBox[ |

1249 | SubscriptBox["Wi", |

1250 | RowBox[{ |

1251 | FormBox["\[Nu]", |

1252 | TraditionalForm], ",", "3"}]], |

1253 | TraditionalForm]}], |

1254 | RowBox[{"2", " ", |

1255 | SqrtBox["2"], " ", |

1256 | FormBox[ |

1257 | SubscriptBox["s", "w"], |

1258 | TraditionalForm]}]]}], "+", |

1259 | FractionBox[ |

1260 | RowBox[{ |

1261 | FormBox["e", |

1262 | TraditionalForm], " ", |

1263 | FormBox[ |

1264 | SubscriptBox["B", |

1265 | FormBox["\[Nu]", |

1266 | TraditionalForm]], |

1267 | TraditionalForm], " ", |

1268 | RowBox[{"(", |

1269 | RowBox[{"H", "+", "v"}], ")"}]}], |

1270 | RowBox[{"2", " ", |

1271 | SqrtBox["2"], " ", |

1272 | FormBox[ |

1273 | SubscriptBox["c", "w"], |

1274 | TraditionalForm]}]], "+", |

1275 | FractionBox[ |

1276 | RowBox[{"\[ImaginaryI]", " ", |

1277 | FormBox[ |

1278 | RowBox[{ |

1279 | SubscriptBox["\<\"\[PartialD]\"\>", |

1280 | FormBox["\[Nu]", |

1281 | TraditionalForm]], "(", "H", ")"}], |

1282 | TraditionalForm]}], |

1283 | SqrtBox["2"]]}], ")"}]}], "+", |

1284 | FractionBox[ |

1285 | RowBox[{ |

1286 | SuperscriptBox[ |

1287 | FormBox["e", |

1288 | TraditionalForm], "2"], " ", |

1289 | SuperscriptBox[ |

1290 | RowBox[{"(", |

1291 | RowBox[{"H", "+", "v"}], ")"}], "2"], " ", |

1292 | RowBox[{"(", |

1293 | RowBox[{ |

1294 | FormBox[ |

1295 | SubscriptBox["Wi", |

1296 | RowBox[{ |

1297 | FormBox["\[Mu]", |

1298 | TraditionalForm], ",", "1"}]], |

1299 | TraditionalForm], "+", |

1300 | RowBox[{"\[ImaginaryI]", " ", |

1301 | FormBox[ |

1302 | SubscriptBox["Wi", |

1303 | RowBox[{ |

1304 | FormBox["\[Mu]", |

1305 | TraditionalForm], ",", "2"}]], |

1306 | TraditionalForm]}]}], ")"}], " ", |

1307 | RowBox[{"(", |

1308 | RowBox[{ |

1309 | FormBox[ |

1310 | SubscriptBox["Wi", |

1311 | RowBox[{ |

1312 | FormBox["\[Nu]", |

1313 | TraditionalForm], ",", "1"}]], |

1314 | TraditionalForm], "-", |

1315 | RowBox[{"\[ImaginaryI]", " ", |

1316 | FormBox[ |

1317 | SubscriptBox["Wi", |

1318 | RowBox[{ |

1319 | FormBox["\[Nu]", |

1320 | TraditionalForm], ",", "2"}]], |

1321 | TraditionalForm]}]}], ")"}]}], |

1322 | RowBox[{"8", " ", |

1323 | SuperscriptBox[ |

1324 | FormBox[ |

1325 | SubscriptBox["s", "w"], |

1326 | TraditionalForm], "2"]}]], "+", |

1327 | FractionBox[ |

1328 | RowBox[{ |

1329 | SuperscriptBox[ |

1330 | FormBox["e", |

1331 | TraditionalForm], "2"], " ", |

1332 | SuperscriptBox[ |

1333 | RowBox[{"(", |

1334 | RowBox[{"H", "+", "v"}], ")"}], "2"], " ", |

1335 | RowBox[{"(", |

1336 | RowBox[{ |

1337 | FormBox[ |

1338 | SubscriptBox["Wi", |

1339 | RowBox[{ |

1340 | FormBox["\[Mu]", |

1341 | TraditionalForm], ",", "1"}]], |

1342 | TraditionalForm], "-", |

1343 | RowBox[{"\[ImaginaryI]", " ", |

1344 | FormBox[ |

1345 | SubscriptBox["Wi", |

1346 | RowBox[{ |

1347 | FormBox["\[Mu]", |

1348 | TraditionalForm], ",", "2"}]], |

1349 | TraditionalForm]}]}], ")"}], " ", |

1350 | RowBox[{"(", |

1351 | RowBox[{ |

1352 | FormBox[ |

1353 | SubscriptBox["Wi", |

1354 | RowBox[{ |

1355 | FormBox["\[Nu]", |

1356 | TraditionalForm], ",", "1"}]], |

1357 | TraditionalForm], "+", |

1358 | RowBox[{"\[ImaginaryI]", " ", |

1359 | FormBox[ |

1360 | SubscriptBox["Wi", |

1361 | RowBox[{ |

1362 | FormBox["\[Nu]", |

1363 | TraditionalForm], ",", "2"}]], |

1364 | TraditionalForm]}]}], ")"}]}], |

1365 | RowBox[{"8", " ", |

1366 | SuperscriptBox[ |

1367 | FormBox[ |

1368 | SubscriptBox["s", "w"], |

1369 | TraditionalForm], "2"]}]], "-", |

1370 | RowBox[{ |

1371 | FractionBox["1", "4"], " ", "\[Lambda]", " ", |

1372 | SuperscriptBox[ |

1373 | RowBox[{"(", |

1374 | RowBox[{"H", "+", "v"}], ")"}], "4"]}], "+", |

1375 | RowBox[{ |

1376 | FractionBox["1", "2"], " ", |

1377 | SuperscriptBox[ |

1378 | FormBox["\[Mu]", |

1379 | TraditionalForm], "2"], " ", |

1380 | SuperscriptBox[ |

1381 | RowBox[{"(", |

1382 | RowBox[{"H", "+", "v"}], ")"}], "2"]}]}], ")"}]}]}], |

1383 | TraditionalForm]], "Output", |

1384 | CellChangeTimes->{3.454061221137125*^9, 3.495340488969482*^9, |

1385 | 3.49534692008082*^9, 3.4953470365285683`*^9}] |

1386 | }, Open ]] |

1387 | }, Open ]], |

1388 | |

1389 | Cell[CellGroupData[{ |

1390 | |

1391 | Cell["Fermion sector", "Subsubsection", |

1392 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

1393 | 3.4119103528868923`*^9, 3.411910357404933*^9}}], |

1394 | |

1395 | Cell[CellGroupData[{ |

1396 | |

1397 | Cell[BoxData["LagF"], "Input", |

1398 | CellChangeTimes->{{3.411910181169772*^9, 3.411910184667088*^9}, { |

1399 | 3.411910379677638*^9, 3.4119103807255*^9}, {3.454050812632284*^9, |

1400 | 3.4540508182235947`*^9}, 3.4540522991223593`*^9, {3.454057102034585*^9, |

1401 | 3.454057104921763*^9}, 3.454061223464816*^9}], |

1402 | |

1403 | Cell[BoxData[ |

1404 | FormBox[ |

1405 | RowBox[{ |

1406 | RowBox[{"-", |

1407 | FractionBox["1", "2"]}], " ", |

1408 | FormBox["\[Kappa]", |

1409 | TraditionalForm], " ", |

1410 | RowBox[{ |

1411 | FormBox[ |

1412 | SubscriptBox["h", |

1413 | RowBox[{ |

1414 | FormBox["\[Mu]", |

1415 | TraditionalForm], ",", |

1416 | FormBox["\[Nu]", |

1417 | TraditionalForm]}]], |

1418 | TraditionalForm], ".", |

1419 | RowBox[{"(", |

1420 | RowBox[{ |

1421 | RowBox[{"-", |

1422 | RowBox[{ |

1423 | FormBox[ |

1424 | SubscriptBox["\[Eta]", |

1425 | RowBox[{ |

1426 | FormBox[ |

1427 | FormBox["\[Mu]", |

1428 | TraditionalForm], |

1429 | TraditionalForm], ",", |

1430 | FormBox[ |

1431 | FormBox["\[Nu]", |

1432 | TraditionalForm], |

1433 | TraditionalForm]}]], |

1434 | TraditionalForm], ".", |

1435 | RowBox[{"(", |

1436 | RowBox[{ |

1437 | RowBox[{"\[ImaginaryI]", " ", |

1438 | RowBox[{ |

1439 | FormBox[ |

1440 | OverscriptBox["dq", "\<\"-\"\>"], |

1441 | TraditionalForm], ".", |

1442 | FormBox[ |

1443 | SuperscriptBox["\[Gamma]", |

1444 | FormBox["\[Rho]", |

1445 | TraditionalForm]], |

1446 | TraditionalForm], ".", |

1447 | RowBox[{"(", |

1448 | RowBox[{ |

1449 | FormBox[ |

1450 | RowBox[{ |

1451 | SubscriptBox["\<\"\[PartialD]\"\>", |

1452 | FormBox["\[Rho]", |

1453 | TraditionalForm]], "(", "dq", ")"}], |

1454 | TraditionalForm], "-", |

1455 | FractionBox[ |

1456 | RowBox[{"\[ImaginaryI]", " ", |

1457 | FormBox["e", |

1458 | TraditionalForm], " ", |

1459 | FormBox[ |

1460 | SubscriptBox["B", |

1461 | FormBox["\[Rho]", |

1462 | TraditionalForm]], |

1463 | TraditionalForm], " ", |

1464 | RowBox[{ |

1465 | FormBox[ |

1466 | SubscriptBox["P", "\<\"-\"\>"], |

1467 | TraditionalForm], ".", "dq"}]}], |

1468 | RowBox[{"6", " ", |

1469 | FormBox[ |

1470 | SubscriptBox["c", "w"], |

1471 | TraditionalForm]}]], "+", |

1472 | FractionBox[ |

1473 | RowBox[{"\[ImaginaryI]", " ", |

1474 | FormBox["e", |

1475 | TraditionalForm], " ", |

1476 | FormBox[ |

1477 | SubscriptBox["B", |

1478 | FormBox["\[Rho]", |

1479 | TraditionalForm]], |

1480 | TraditionalForm], " ", |

1481 | RowBox[{ |

1482 | FormBox[ |

1483 | SubscriptBox["P", "\<\"+\"\>"], |

1484 | TraditionalForm], ".", "dq"}]}], |

1485 | RowBox[{"3", " ", |

1486 | FormBox[ |

1487 | SubscriptBox["c", "w"], |

1488 | TraditionalForm]}]], "-", |

1489 | RowBox[{"\[ImaginaryI]", " ", |

1490 | FormBox[ |

1491 | SubscriptBox["g", "s"], |

1492 | TraditionalForm], " ", |

1493 | RowBox[{ |

1494 | FormBox[ |

1495 | SuperscriptBox["T", "a$861"], |

1496 | TraditionalForm], ".", "dq"}], " ", |

1497 | FormBox[ |

1498 | SubscriptBox["G", |

1499 | RowBox[{ |

1500 | FormBox["\[Rho]", |

1501 | TraditionalForm], ",", "a$861"}]], |

1502 | TraditionalForm]}], "+", |

1503 | FractionBox[ |

1504 | RowBox[{"\[ImaginaryI]", " ", |

1505 | FormBox["e", |

1506 | TraditionalForm], " ", |

1507 | RowBox[{ |

1508 | FormBox[ |

1509 | SubscriptBox["P", "\<\"-\"\>"], |

1510 | TraditionalForm], ".", "dq"}], " ", |

1511 | FormBox[ |

1512 | SubscriptBox["Wi", |

1513 | RowBox[{ |

1514 | FormBox["\[Rho]", |

1515 | TraditionalForm], ",", "3"}]], |

1516 | TraditionalForm]}], |

1517 | RowBox[{"2", " ", |

1518 | FormBox[ |

1519 | SubscriptBox["s", "w"], |

1520 | TraditionalForm]}]]}], ")"}]}]}], "+", |

1521 | RowBox[{"\[ImaginaryI]", " ", |

1522 | RowBox[{ |

1523 | FormBox[ |

1524 | OverscriptBox["l", "\<\"-\"\>"], |

1525 | TraditionalForm], ".", |

1526 | FormBox[ |

1527 | SuperscriptBox["\[Gamma]", |

1528 | FormBox["\[Rho]", |

1529 | TraditionalForm]], |

1530 | TraditionalForm], ".", |

1531 | RowBox[{"(", |

1532 | RowBox[{ |

1533 | FormBox[ |

1534 | RowBox[{ |

1535 | SubscriptBox["\<\"\[PartialD]\"\>", |

1536 | FormBox["\[Rho]", |

1537 | TraditionalForm]], "(", "l", ")"}], |

1538 | TraditionalForm], "-", |

1539 | FractionBox[ |

1540 | RowBox[{"\[ImaginaryI]", " ", |

1541 | FormBox["e", |

1542 | TraditionalForm], " ", |

1543 | FormBox[ |

1544 | SubscriptBox["B", |

1545 | FormBox["\[Rho]", |

1546 | TraditionalForm]], |

1547 | TraditionalForm], " ", |

1548 | RowBox[{ |

1549 | FormBox[ |

1550 | SubscriptBox["P", "\<\"-\"\>"], |

1551 | TraditionalForm], ".", "l"}]}], |

1552 | RowBox[{"2", " ", |

1553 | FormBox[ |

1554 | SubscriptBox["c", "w"], |

1555 | TraditionalForm]}]], "+", |

1556 | FractionBox[ |

1557 | RowBox[{"\[ImaginaryI]", " ", |

1558 | FormBox["e", |

1559 | TraditionalForm], " ", |

1560 | FormBox[ |

1561 | SubscriptBox["B", |

1562 | FormBox["\[Rho]", |

1563 | TraditionalForm]], |

1564 | TraditionalForm], " ", |

1565 | RowBox[{ |

1566 | FormBox[ |

1567 | SubscriptBox["P", "\<\"+\"\>"], |

1568 | TraditionalForm], ".", "l"}]}], |

1569 | FormBox[ |

1570 | SubscriptBox["c", "w"], |

1571 | TraditionalForm]], "+", |

1572 | FractionBox[ |

1573 | RowBox[{"\[ImaginaryI]", " ", |

1574 | FormBox["e", |

1575 | TraditionalForm], " ", |

1576 | RowBox[{ |

1577 | FormBox[ |

1578 | SubscriptBox["P", "\<\"-\"\>"], |

1579 | TraditionalForm], ".", "l"}], " ", |

1580 | FormBox[ |

1581 | SubscriptBox["Wi", |

1582 | RowBox[{ |

1583 | FormBox["\[Rho]", |

1584 | TraditionalForm], ",", "3"}]], |

1585 | TraditionalForm]}], |

1586 | RowBox[{"2", " ", |

1587 | FormBox[ |

1588 | SubscriptBox["s", "w"], |

1589 | TraditionalForm]}]]}], ")"}]}]}], "+", |

1590 | RowBox[{"\[ImaginaryI]", " ", |

1591 | RowBox[{ |

1592 | FormBox[ |

1593 | OverscriptBox["uq", "\<\"-\"\>"], |

1594 | TraditionalForm], ".", |

1595 | FormBox[ |

1596 | SuperscriptBox["\[Gamma]", |

1597 | FormBox["\[Rho]", |

1598 | TraditionalForm]], |

1599 | TraditionalForm], ".", |

1600 | RowBox[{"(", |

1601 | RowBox[{ |

1602 | FormBox[ |

1603 | RowBox[{ |

1604 | SubscriptBox["\<\"\[PartialD]\"\>", |

1605 | FormBox["\[Rho]", |

1606 | TraditionalForm]], "(", "uq", ")"}], |

1607 | TraditionalForm], "-", |

1608 | FractionBox[ |

1609 | RowBox[{"\[ImaginaryI]", " ", |

1610 | FormBox["e", |

1611 | TraditionalForm], " ", |

1612 | FormBox[ |

1613 | SubscriptBox["B", |

1614 | FormBox["\[Rho]", |

1615 | TraditionalForm]], |

1616 | TraditionalForm], " ", |

1617 | RowBox[{ |

1618 | FormBox[ |

1619 | SubscriptBox["P", "\<\"-\"\>"], |

1620 | TraditionalForm], ".", "uq"}]}], |

1621 | RowBox[{"6", " ", |

1622 | FormBox[ |

1623 | SubscriptBox["c", "w"], |

1624 | TraditionalForm]}]], "-", |

1625 | FractionBox[ |

1626 | RowBox[{"2", " ", "\[ImaginaryI]", " ", |

1627 | FormBox["e", |

1628 | TraditionalForm], " ", |

1629 | FormBox[ |

1630 | SubscriptBox["B", |

1631 | FormBox["\[Rho]", |

1632 | TraditionalForm]], |

1633 | TraditionalForm], " ", |

1634 | RowBox[{ |

1635 | FormBox[ |

1636 | SubscriptBox["P", "\<\"+\"\>"], |

1637 | TraditionalForm], ".", "uq"}]}], |

1638 | RowBox[{"3", " ", |

1639 | FormBox[ |

1640 | SubscriptBox["c", "w"], |

1641 | TraditionalForm]}]], "-", |

1642 | RowBox[{"\[ImaginaryI]", " ", |

1643 | FormBox[ |

1644 | SubscriptBox["g", "s"], |

1645 | TraditionalForm], " ", |

1646 | RowBox[{ |

1647 | FormBox[ |

1648 | SuperscriptBox["T", "a$860"], |

1649 | TraditionalForm], ".", "uq"}], " ", |

1650 | FormBox[ |

1651 | SubscriptBox["G", |

1652 | RowBox[{ |

1653 | FormBox["\[Rho]", |

1654 | TraditionalForm], ",", "a$860"}]], |

1655 | TraditionalForm]}], "-", |

1656 | FractionBox[ |

1657 | RowBox[{"\[ImaginaryI]", " ", |

1658 | FormBox["e", |

1659 | TraditionalForm], " ", |

1660 | RowBox[{ |

1661 | FormBox[ |

1662 | SubscriptBox["P", "\<\"-\"\>"], |

1663 | TraditionalForm], ".", "uq"}], " ", |

1664 | FormBox[ |

1665 | SubscriptBox["Wi", |

1666 | RowBox[{ |

1667 | FormBox["\[Rho]", |

1668 | TraditionalForm], ",", "3"}]], |

1669 | TraditionalForm]}], |

1670 | RowBox[{"2", " ", |

1671 | FormBox[ |

1672 | SubscriptBox["s", "w"], |

1673 | TraditionalForm]}]]}], ")"}]}]}], "+", |

1674 | RowBox[{"\[ImaginaryI]", " ", |

1675 | RowBox[{ |

1676 | FormBox[ |

1677 | OverscriptBox["vl", "\<\"-\"\>"], |

1678 | TraditionalForm], ".", |

1679 | FormBox[ |

1680 | SuperscriptBox["\[Gamma]", |

1681 | FormBox["\[Rho]", |

1682 | TraditionalForm]], |

1683 | TraditionalForm], ".", |

1684 | RowBox[{"(", |

1685 | RowBox[{ |

1686 | FormBox[ |

1687 | RowBox[{ |

1688 | SubscriptBox["\<\"\[PartialD]\"\>", |

1689 | FormBox["\[Rho]", |

1690 | TraditionalForm]], "(", "vl", ")"}], |

1691 | TraditionalForm], "+", |

1692 | FractionBox[ |

1693 | RowBox[{"\[ImaginaryI]", " ", |

1694 | FormBox["e", |

1695 | TraditionalForm], " ", |

1696 | FormBox[ |

1697 | SubscriptBox["B", |

1698 | FormBox["\[Rho]", |

1699 | TraditionalForm]], |

1700 | TraditionalForm], " ", |

1701 | RowBox[{ |

1702 | FormBox[ |

1703 | SubscriptBox["P", "\<\"-\"\>"], |

1704 | TraditionalForm], ".", "vl"}]}], |

1705 | RowBox[{"2", " ", |

1706 | FormBox[ |

1707 | SubscriptBox["c", "w"], |

1708 | TraditionalForm]}]], "-", |

1709 | FractionBox[ |

1710 | RowBox[{"\[ImaginaryI]", " ", |

1711 | FormBox["e", |

1712 | TraditionalForm], " ", |

1713 | RowBox[{ |

1714 | FormBox[ |

1715 | SubscriptBox["P", "\<\"-\"\>"], |

1716 | TraditionalForm], ".", "vl"}], " ", |

1717 | FormBox[ |

1718 | SubscriptBox["Wi", |

1719 | RowBox[{ |

1720 | FormBox["\[Rho]", |

1721 | TraditionalForm], ",", "3"}]], |

1722 | TraditionalForm]}], |

1723 | RowBox[{"2", " ", |

1724 | FormBox[ |

1725 | SubscriptBox["s", "w"], |

1726 | TraditionalForm]}]]}], ")"}]}]}], "-", |

1727 | RowBox[{ |

1728 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

1729 | RowBox[{"(", |

1730 | RowBox[{ |

1731 | RowBox[{ |

1732 | FormBox[ |

1733 | OverscriptBox["dq", "\<\"-\"\>"], |

1734 | TraditionalForm], ".", |

1735 | FormBox[ |

1736 | SuperscriptBox["\[Gamma]", |

1737 | FormBox["\[Rho]", |

1738 | TraditionalForm]], |

1739 | TraditionalForm], ".", |

1740 | FormBox[ |

1741 | RowBox[{ |

1742 | SubscriptBox["\<\"\[PartialD]\"\>", |

1743 | FormBox["\[Rho]", |

1744 | TraditionalForm]], "(", "dq", ")"}], |

1745 | TraditionalForm]}], "+", |

1746 | RowBox[{ |

1747 | FormBox[ |

1748 | RowBox[{ |

1749 | SubscriptBox["\<\"\[PartialD]\"\>", |

1750 | FormBox["\[Rho]", |

1751 | TraditionalForm]], "(", |

1752 | FormBox[ |

1753 | OverscriptBox["dq", "\<\"-\"\>"], |

1754 | TraditionalForm], ")"}], |

1755 | TraditionalForm], ".", |

1756 | FormBox[ |

1757 | SuperscriptBox["\[Gamma]", |

1758 | FormBox["\[Rho]", |

1759 | TraditionalForm]], |

1760 | TraditionalForm], ".", "dq"}]}], ")"}]}], "-", |

1761 | RowBox[{ |

1762 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

1763 | RowBox[{"(", |

1764 | RowBox[{ |

1765 | RowBox[{ |

1766 | FormBox[ |

1767 | OverscriptBox["l", "\<\"-\"\>"], |

1768 | TraditionalForm], ".", |

1769 | FormBox[ |

1770 | SuperscriptBox["\[Gamma]", |

1771 | FormBox["\[Rho]", |

1772 | TraditionalForm]], |

1773 | TraditionalForm], ".", |

1774 | FormBox[ |

1775 | RowBox[{ |

1776 | SubscriptBox["\<\"\[PartialD]\"\>", |

1777 | FormBox["\[Rho]", |

1778 | TraditionalForm]], "(", "l", ")"}], |

1779 | TraditionalForm]}], "+", |

1780 | RowBox[{ |

1781 | FormBox[ |

1782 | RowBox[{ |

1783 | SubscriptBox["\<\"\[PartialD]\"\>", |

1784 | FormBox["\[Rho]", |

1785 | TraditionalForm]], "(", |

1786 | FormBox[ |

1787 | OverscriptBox["l", "\<\"-\"\>"], |

1788 | TraditionalForm], ")"}], |

1789 | TraditionalForm], ".", |

1790 | FormBox[ |

1791 | SuperscriptBox["\[Gamma]", |

1792 | FormBox["\[Rho]", |

1793 | TraditionalForm]], |

1794 | TraditionalForm], ".", "l"}]}], ")"}]}], "-", |

1795 | RowBox[{ |

1796 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

1797 | RowBox[{"(", |

1798 | RowBox[{ |

1799 | RowBox[{ |

1800 | FormBox[ |

1801 | OverscriptBox["uq", "\<\"-\"\>"], |

1802 | TraditionalForm], ".", |

1803 | FormBox[ |

1804 | SuperscriptBox["\[Gamma]", |

1805 | FormBox["\[Rho]", |

1806 | TraditionalForm]], |

1807 | TraditionalForm], ".", |

1808 | FormBox[ |

1809 | RowBox[{ |

1810 | SubscriptBox["\<\"\[PartialD]\"\>", |

1811 | FormBox["\[Rho]", |

1812 | TraditionalForm]], "(", "uq", ")"}], |

1813 | TraditionalForm]}], "+", |

1814 | RowBox[{ |

1815 | FormBox[ |

1816 | RowBox[{ |

1817 | SubscriptBox["\<\"\[PartialD]\"\>", |

1818 | FormBox["\[Rho]", |

1819 | TraditionalForm]], "(", |

1820 | FormBox[ |

1821 | OverscriptBox["uq", "\<\"-\"\>"], |

1822 | TraditionalForm], ")"}], |

1823 | TraditionalForm], ".", |

1824 | FormBox[ |

1825 | SuperscriptBox["\[Gamma]", |

1826 | FormBox["\[Rho]", |

1827 | TraditionalForm]], |

1828 | TraditionalForm], ".", "uq"}]}], ")"}]}], "-", |

1829 | RowBox[{ |

1830 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

1831 | RowBox[{"(", |

1832 | RowBox[{ |

1833 | RowBox[{ |

1834 | FormBox[ |

1835 | OverscriptBox["vl", "\<\"-\"\>"], |

1836 | TraditionalForm], ".", |

1837 | FormBox[ |

1838 | SuperscriptBox["\[Gamma]", |

1839 | FormBox["\[Rho]", |

1840 | TraditionalForm]], |

1841 | TraditionalForm], ".", |

1842 | FormBox[ |

1843 | RowBox[{ |

1844 | SubscriptBox["\<\"\[PartialD]\"\>", |

1845 | FormBox["\[Rho]", |

1846 | TraditionalForm]], "(", "vl", ")"}], |

1847 | TraditionalForm]}], "+", |

1848 | RowBox[{ |

1849 | FormBox[ |

1850 | RowBox[{ |

1851 | SubscriptBox["\<\"\[PartialD]\"\>", |

1852 | FormBox["\[Rho]", |

1853 | TraditionalForm]], "(", |

1854 | FormBox[ |

1855 | OverscriptBox["vl", "\<\"-\"\>"], |

1856 | TraditionalForm], ")"}], |

1857 | TraditionalForm], ".", |

1858 | FormBox[ |

1859 | SuperscriptBox["\[Gamma]", |

1860 | FormBox["\[Rho]", |

1861 | TraditionalForm]], |

1862 | TraditionalForm], ".", "vl"}]}], ")"}]}], "-", |

1863 | FractionBox[ |

1864 | RowBox[{ |

1865 | FormBox["e", |

1866 | TraditionalForm], " ", |

1867 | RowBox[{"(", |

1868 | RowBox[{ |

1869 | RowBox[{"CKM", " ", |

1870 | RowBox[{ |

1871 | FormBox[ |

1872 | OverscriptBox["uq", "\<\"-\"\>"], |

1873 | TraditionalForm], ".", |

1874 | FormBox[ |

1875 | SuperscriptBox["\[Gamma]", |

1876 | FormBox["\[Rho]", |

1877 | TraditionalForm]], |

1878 | TraditionalForm], ".", |

1879 | FormBox[ |

1880 | SubscriptBox["P", "\<\"-\"\>"], |

1881 | TraditionalForm], ".", "dq"}], " ", |

1882 | FormBox[ |

1883 | SubscriptBox["W", |

1884 | FormBox["\[Rho]", |

1885 | TraditionalForm]], |

1886 | TraditionalForm]}], "+", |

1887 | RowBox[{ |

1888 | RowBox[{ |

1889 | FormBox[ |

1890 | OverscriptBox["vl", "\<\"-\"\>"], |

1891 | TraditionalForm], ".", |

1892 | FormBox[ |

1893 | SuperscriptBox["\[Gamma]", |

1894 | FormBox["\[Rho]", |

1895 | TraditionalForm]], |

1896 | TraditionalForm], ".", |

1897 | FormBox[ |

1898 | SubscriptBox["P", "\<\"-\"\>"], |

1899 | TraditionalForm], ".", "l"}], " ", |

1900 | FormBox[ |

1901 | SubscriptBox["W", |

1902 | FormBox["\[Rho]", |

1903 | TraditionalForm]], |

1904 | TraditionalForm]}], "+", |

1905 | RowBox[{ |

1906 | RowBox[{ |

1907 | FormBox[ |

1908 | OverscriptBox["l", "\<\"-\"\>"], |

1909 | TraditionalForm], ".", |

1910 | FormBox[ |

1911 | SuperscriptBox["\[Gamma]", |

1912 | FormBox["\[Rho]", |

1913 | TraditionalForm]], |

1914 | TraditionalForm], ".", |

1915 | FormBox[ |

1916 | SubscriptBox["P", "\<\"-\"\>"], |

1917 | TraditionalForm], ".", "vl"}], " ", |

1918 | FormBox[ |

1919 | SubsuperscriptBox["W", |

1920 | FormBox["\[Rho]", |

1921 | TraditionalForm], "\[Dagger]"], |

1922 | TraditionalForm]}], "+", |

1923 | RowBox[{ |

1924 | RowBox[{ |

1925 | FormBox[ |

1926 | OverscriptBox["dq", "\<\"-\"\>"], |

1927 | TraditionalForm], ".", |

1928 | FormBox[ |

1929 | SuperscriptBox["\[Gamma]", |

1930 | FormBox["\[Rho]", |

1931 | TraditionalForm]], |

1932 | TraditionalForm], ".", |

1933 | FormBox[ |

1934 | SubscriptBox["P", "\<\"-\"\>"], |

1935 | TraditionalForm], ".", "uq"}], " ", |

1936 | FormBox[ |

1937 | SuperscriptBox["CKM", "\[Dagger]"], |

1938 | TraditionalForm], " ", |

1939 | FormBox[ |

1940 | SubsuperscriptBox["W", |

1941 | FormBox["\[Rho]", |

1942 | TraditionalForm], "\[Dagger]"], |

1943 | TraditionalForm]}]}], ")"}]}], |

1944 | RowBox[{ |

1945 | SqrtBox["2"], " ", |

1946 | FormBox[ |

1947 | SubscriptBox["s", "w"], |

1948 | TraditionalForm]}]]}], ")"}]}]}], "+", |

1949 | RowBox[{ |

1950 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

1951 | RowBox[{ |

1952 | FormBox[ |

1953 | OverscriptBox["dq", "\<\"-\"\>"], |

1954 | TraditionalForm], ".", |

1955 | FormBox[ |

1956 | SuperscriptBox["\[Gamma]", |

1957 | FormBox["\[Mu]", |

1958 | TraditionalForm]], |

1959 | TraditionalForm], ".", |

1960 | RowBox[{"(", |

1961 | RowBox[{ |

1962 | FormBox[ |

1963 | RowBox[{ |

1964 | SubscriptBox["\<\"\[PartialD]\"\>", |

1965 | FormBox["\[Nu]", |

1966 | TraditionalForm]], "(", "dq", ")"}], |

1967 | TraditionalForm], "-", |

1968 | FractionBox[ |

1969 | RowBox[{"\[ImaginaryI]", " ", |

1970 | FormBox["e", |

1971 | TraditionalForm], " ", |

1972 | FormBox[ |

1973 | SubscriptBox["B", |

1974 | FormBox["\[Nu]", |

1975 | TraditionalForm]], |

1976 | TraditionalForm], " ", |

1977 | RowBox[{ |

1978 | FormBox[ |

1979 | SubscriptBox["P", "\<\"-\"\>"], |

1980 | TraditionalForm], ".", "dq"}]}], |

1981 | RowBox[{"6", " ", |

1982 | FormBox[ |

1983 | SubscriptBox["c", "w"], |

1984 | TraditionalForm]}]], "+", |

1985 | FractionBox[ |

1986 | RowBox[{"\[ImaginaryI]", " ", |

1987 | FormBox["e", |

1988 | TraditionalForm], " ", |

1989 | FormBox[ |

1990 | SubscriptBox["B", |

1991 | FormBox["\[Nu]", |

1992 | TraditionalForm]], |

1993 | TraditionalForm], " ", |

1994 | RowBox[{ |

1995 | FormBox[ |

1996 | SubscriptBox["P", "\<\"+\"\>"], |

1997 | TraditionalForm], ".", "dq"}]}], |

1998 | RowBox[{"3", " ", |

1999 | FormBox[ |

2000 | SubscriptBox["c", "w"], |

2001 | TraditionalForm]}]], "-", |

2002 | RowBox[{"\[ImaginaryI]", " ", |

2003 | FormBox[ |

2004 | SubscriptBox["g", "s"], |

2005 | TraditionalForm], " ", |

2006 | RowBox[{ |

2007 | FormBox[ |

2008 | SuperscriptBox["T", "a$866"], |

2009 | TraditionalForm], ".", "dq"}], " ", |

2010 | FormBox[ |

2011 | SubscriptBox["G", |

2012 | RowBox[{ |

2013 | FormBox["\[Nu]", |

2014 | TraditionalForm], ",", "a$866"}]], |

2015 | TraditionalForm]}], "+", |

2016 | FractionBox[ |

2017 | RowBox[{"\[ImaginaryI]", " ", |

2018 | FormBox["e", |

2019 | TraditionalForm], " ", |

2020 | RowBox[{ |

2021 | FormBox[ |

2022 | SubscriptBox["P", "\<\"-\"\>"], |

2023 | TraditionalForm], ".", "dq"}], " ", |

2024 | FormBox[ |

2025 | SubscriptBox["Wi", |

2026 | RowBox[{ |

2027 | FormBox["\[Nu]", |

2028 | TraditionalForm], ",", "3"}]], |

2029 | TraditionalForm]}], |

2030 | RowBox[{"2", " ", |

2031 | FormBox[ |

2032 | SubscriptBox["s", "w"], |

2033 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2034 | RowBox[{ |

2035 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2036 | RowBox[{ |

2037 | FormBox[ |

2038 | OverscriptBox["dq", "\<\"-\"\>"], |

2039 | TraditionalForm], ".", |

2040 | FormBox[ |

2041 | SuperscriptBox["\[Gamma]", |

2042 | FormBox["\[Nu]", |

2043 | TraditionalForm]], |

2044 | TraditionalForm], ".", |

2045 | RowBox[{"(", |

2046 | RowBox[{ |

2047 | FormBox[ |

2048 | RowBox[{ |

2049 | SubscriptBox["\<\"\[PartialD]\"\>", |

2050 | FormBox["\[Mu]", |

2051 | TraditionalForm]], "(", "dq", ")"}], |

2052 | TraditionalForm], "-", |

2053 | FractionBox[ |

2054 | RowBox[{"\[ImaginaryI]", " ", |

2055 | FormBox["e", |

2056 | TraditionalForm], " ", |

2057 | FormBox[ |

2058 | SubscriptBox["B", |

2059 | FormBox["\[Mu]", |

2060 | TraditionalForm]], |

2061 | TraditionalForm], " ", |

2062 | RowBox[{ |

2063 | FormBox[ |

2064 | SubscriptBox["P", "\<\"-\"\>"], |

2065 | TraditionalForm], ".", "dq"}]}], |

2066 | RowBox[{"6", " ", |

2067 | FormBox[ |

2068 | SubscriptBox["c", "w"], |

2069 | TraditionalForm]}]], "+", |

2070 | FractionBox[ |

2071 | RowBox[{"\[ImaginaryI]", " ", |

2072 | FormBox["e", |

2073 | TraditionalForm], " ", |

2074 | FormBox[ |

2075 | SubscriptBox["B", |

2076 | FormBox["\[Mu]", |

2077 | TraditionalForm]], |

2078 | TraditionalForm], " ", |

2079 | RowBox[{ |

2080 | FormBox[ |

2081 | SubscriptBox["P", "\<\"+\"\>"], |

2082 | TraditionalForm], ".", "dq"}]}], |

2083 | RowBox[{"3", " ", |

2084 | FormBox[ |

2085 | SubscriptBox["c", "w"], |

2086 | TraditionalForm]}]], "-", |

2087 | RowBox[{"\[ImaginaryI]", " ", |

2088 | FormBox[ |

2089 | SubscriptBox["g", "s"], |

2090 | TraditionalForm], " ", |

2091 | RowBox[{ |

2092 | FormBox[ |

2093 | SuperscriptBox["T", "a$867"], |

2094 | TraditionalForm], ".", "dq"}], " ", |

2095 | FormBox[ |

2096 | SubscriptBox["G", |

2097 | RowBox[{ |

2098 | FormBox["\[Mu]", |

2099 | TraditionalForm], ",", "a$867"}]], |

2100 | TraditionalForm]}], "+", |

2101 | FractionBox[ |

2102 | RowBox[{"\[ImaginaryI]", " ", |

2103 | FormBox["e", |

2104 | TraditionalForm], " ", |

2105 | RowBox[{ |

2106 | FormBox[ |

2107 | SubscriptBox["P", "\<\"-\"\>"], |

2108 | TraditionalForm], ".", "dq"}], " ", |

2109 | FormBox[ |

2110 | SubscriptBox["Wi", |

2111 | RowBox[{ |

2112 | FormBox["\[Mu]", |

2113 | TraditionalForm], ",", "3"}]], |

2114 | TraditionalForm]}], |

2115 | RowBox[{"2", " ", |

2116 | FormBox[ |

2117 | SubscriptBox["s", "w"], |

2118 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2119 | RowBox[{ |

2120 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2121 | RowBox[{ |

2122 | FormBox[ |

2123 | OverscriptBox["l", "\<\"-\"\>"], |

2124 | TraditionalForm], ".", |

2125 | FormBox[ |

2126 | SuperscriptBox["\[Gamma]", |

2127 | FormBox["\[Mu]", |

2128 | TraditionalForm]], |

2129 | TraditionalForm], ".", |

2130 | RowBox[{"(", |

2131 | RowBox[{ |

2132 | FormBox[ |

2133 | RowBox[{ |

2134 | SubscriptBox["\<\"\[PartialD]\"\>", |

2135 | FormBox["\[Nu]", |

2136 | TraditionalForm]], "(", "l", ")"}], |

2137 | TraditionalForm], "-", |

2138 | FractionBox[ |

2139 | RowBox[{"\[ImaginaryI]", " ", |

2140 | FormBox["e", |

2141 | TraditionalForm], " ", |

2142 | FormBox[ |

2143 | SubscriptBox["B", |

2144 | FormBox["\[Nu]", |

2145 | TraditionalForm]], |

2146 | TraditionalForm], " ", |

2147 | RowBox[{ |

2148 | FormBox[ |

2149 | SubscriptBox["P", "\<\"-\"\>"], |

2150 | TraditionalForm], ".", "l"}]}], |

2151 | RowBox[{"2", " ", |

2152 | FormBox[ |

2153 | SubscriptBox["c", "w"], |

2154 | TraditionalForm]}]], "+", |

2155 | FractionBox[ |

2156 | RowBox[{"\[ImaginaryI]", " ", |

2157 | FormBox["e", |

2158 | TraditionalForm], " ", |

2159 | FormBox[ |

2160 | SubscriptBox["B", |

2161 | FormBox["\[Nu]", |

2162 | TraditionalForm]], |

2163 | TraditionalForm], " ", |

2164 | RowBox[{ |

2165 | FormBox[ |

2166 | SubscriptBox["P", "\<\"+\"\>"], |

2167 | TraditionalForm], ".", "l"}]}], |

2168 | FormBox[ |

2169 | SubscriptBox["c", "w"], |

2170 | TraditionalForm]], "+", |

2171 | FractionBox[ |

2172 | RowBox[{"\[ImaginaryI]", " ", |

2173 | FormBox["e", |

2174 | TraditionalForm], " ", |

2175 | RowBox[{ |

2176 | FormBox[ |

2177 | SubscriptBox["P", "\<\"-\"\>"], |

2178 | TraditionalForm], ".", "l"}], " ", |

2179 | FormBox[ |

2180 | SubscriptBox["Wi", |

2181 | RowBox[{ |

2182 | FormBox["\[Nu]", |

2183 | TraditionalForm], ",", "3"}]], |

2184 | TraditionalForm]}], |

2185 | RowBox[{"2", " ", |

2186 | FormBox[ |

2187 | SubscriptBox["s", "w"], |

2188 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2189 | RowBox[{ |

2190 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2191 | RowBox[{ |

2192 | FormBox[ |

2193 | OverscriptBox["l", "\<\"-\"\>"], |

2194 | TraditionalForm], ".", |

2195 | FormBox[ |

2196 | SuperscriptBox["\[Gamma]", |

2197 | FormBox["\[Nu]", |

2198 | TraditionalForm]], |

2199 | TraditionalForm], ".", |

2200 | RowBox[{"(", |

2201 | RowBox[{ |

2202 | FormBox[ |

2203 | RowBox[{ |

2204 | SubscriptBox["\<\"\[PartialD]\"\>", |

2205 | FormBox["\[Mu]", |

2206 | TraditionalForm]], "(", "l", ")"}], |

2207 | TraditionalForm], "-", |

2208 | FractionBox[ |

2209 | RowBox[{"\[ImaginaryI]", " ", |

2210 | FormBox["e", |

2211 | TraditionalForm], " ", |

2212 | FormBox[ |

2213 | SubscriptBox["B", |

2214 | FormBox["\[Mu]", |

2215 | TraditionalForm]], |

2216 | TraditionalForm], " ", |

2217 | RowBox[{ |

2218 | FormBox[ |

2219 | SubscriptBox["P", "\<\"-\"\>"], |

2220 | TraditionalForm], ".", "l"}]}], |

2221 | RowBox[{"2", " ", |

2222 | FormBox[ |

2223 | SubscriptBox["c", "w"], |

2224 | TraditionalForm]}]], "+", |

2225 | FractionBox[ |

2226 | RowBox[{"\[ImaginaryI]", " ", |

2227 | FormBox["e", |

2228 | TraditionalForm], " ", |

2229 | FormBox[ |

2230 | SubscriptBox["B", |

2231 | FormBox["\[Mu]", |

2232 | TraditionalForm]], |

2233 | TraditionalForm], " ", |

2234 | RowBox[{ |

2235 | FormBox[ |

2236 | SubscriptBox["P", "\<\"+\"\>"], |

2237 | TraditionalForm], ".", "l"}]}], |

2238 | FormBox[ |

2239 | SubscriptBox["c", "w"], |

2240 | TraditionalForm]], "+", |

2241 | FractionBox[ |

2242 | RowBox[{"\[ImaginaryI]", " ", |

2243 | FormBox["e", |

2244 | TraditionalForm], " ", |

2245 | RowBox[{ |

2246 | FormBox[ |

2247 | SubscriptBox["P", "\<\"-\"\>"], |

2248 | TraditionalForm], ".", "l"}], " ", |

2249 | FormBox[ |

2250 | SubscriptBox["Wi", |

2251 | RowBox[{ |

2252 | FormBox["\[Mu]", |

2253 | TraditionalForm], ",", "3"}]], |

2254 | TraditionalForm]}], |

2255 | RowBox[{"2", " ", |

2256 | FormBox[ |

2257 | SubscriptBox["s", "w"], |

2258 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2259 | RowBox[{ |

2260 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2261 | RowBox[{ |

2262 | FormBox[ |

2263 | OverscriptBox["uq", "\<\"-\"\>"], |

2264 | TraditionalForm], ".", |

2265 | FormBox[ |

2266 | SuperscriptBox["\[Gamma]", |

2267 | FormBox["\[Mu]", |

2268 | TraditionalForm]], |

2269 | TraditionalForm], ".", |

2270 | RowBox[{"(", |

2271 | RowBox[{ |

2272 | FormBox[ |

2273 | RowBox[{ |

2274 | SubscriptBox["\<\"\[PartialD]\"\>", |

2275 | FormBox["\[Nu]", |

2276 | TraditionalForm]], "(", "uq", ")"}], |

2277 | TraditionalForm], "-", |

2278 | FractionBox[ |

2279 | RowBox[{"\[ImaginaryI]", " ", |

2280 | FormBox["e", |

2281 | TraditionalForm], " ", |

2282 | FormBox[ |

2283 | SubscriptBox["B", |

2284 | FormBox["\[Nu]", |

2285 | TraditionalForm]], |

2286 | TraditionalForm], " ", |

2287 | RowBox[{ |

2288 | FormBox[ |

2289 | SubscriptBox["P", "\<\"-\"\>"], |

2290 | TraditionalForm], ".", "uq"}]}], |

2291 | RowBox[{"6", " ", |

2292 | FormBox[ |

2293 | SubscriptBox["c", "w"], |

2294 | TraditionalForm]}]], "-", |

2295 | FractionBox[ |

2296 | RowBox[{"2", " ", "\[ImaginaryI]", " ", |

2297 | FormBox["e", |

2298 | TraditionalForm], " ", |

2299 | FormBox[ |

2300 | SubscriptBox["B", |

2301 | FormBox["\[Nu]", |

2302 | TraditionalForm]], |

2303 | TraditionalForm], " ", |

2304 | RowBox[{ |

2305 | FormBox[ |

2306 | SubscriptBox["P", "\<\"+\"\>"], |

2307 | TraditionalForm], ".", "uq"}]}], |

2308 | RowBox[{"3", " ", |

2309 | FormBox[ |

2310 | SubscriptBox["c", "w"], |

2311 | TraditionalForm]}]], "-", |

2312 | RowBox[{"\[ImaginaryI]", " ", |

2313 | FormBox[ |

2314 | SubscriptBox["g", "s"], |

2315 | TraditionalForm], " ", |

2316 | RowBox[{ |

2317 | FormBox[ |

2318 | SuperscriptBox["T", "a$864"], |

2319 | TraditionalForm], ".", "uq"}], " ", |

2320 | FormBox[ |

2321 | SubscriptBox["G", |

2322 | RowBox[{ |

2323 | FormBox["\[Nu]", |

2324 | TraditionalForm], ",", "a$864"}]], |

2325 | TraditionalForm]}], "-", |

2326 | FractionBox[ |

2327 | RowBox[{"\[ImaginaryI]", " ", |

2328 | FormBox["e", |

2329 | TraditionalForm], " ", |

2330 | RowBox[{ |

2331 | FormBox[ |

2332 | SubscriptBox["P", "\<\"-\"\>"], |

2333 | TraditionalForm], ".", "uq"}], " ", |

2334 | FormBox[ |

2335 | SubscriptBox["Wi", |

2336 | RowBox[{ |

2337 | FormBox["\[Nu]", |

2338 | TraditionalForm], ",", "3"}]], |

2339 | TraditionalForm]}], |

2340 | RowBox[{"2", " ", |

2341 | FormBox[ |

2342 | SubscriptBox["s", "w"], |

2343 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2344 | RowBox[{ |

2345 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2346 | RowBox[{ |

2347 | FormBox[ |

2348 | OverscriptBox["uq", "\<\"-\"\>"], |

2349 | TraditionalForm], ".", |

2350 | FormBox[ |

2351 | SuperscriptBox["\[Gamma]", |

2352 | FormBox["\[Nu]", |

2353 | TraditionalForm]], |

2354 | TraditionalForm], ".", |

2355 | RowBox[{"(", |

2356 | RowBox[{ |

2357 | FormBox[ |

2358 | RowBox[{ |

2359 | SubscriptBox["\<\"\[PartialD]\"\>", |

2360 | FormBox["\[Mu]", |

2361 | TraditionalForm]], "(", "uq", ")"}], |

2362 | TraditionalForm], "-", |

2363 | FractionBox[ |

2364 | RowBox[{"\[ImaginaryI]", " ", |

2365 | FormBox["e", |

2366 | TraditionalForm], " ", |

2367 | FormBox[ |

2368 | SubscriptBox["B", |

2369 | FormBox["\[Mu]", |

2370 | TraditionalForm]], |

2371 | TraditionalForm], " ", |

2372 | RowBox[{ |

2373 | FormBox[ |

2374 | SubscriptBox["P", "\<\"-\"\>"], |

2375 | TraditionalForm], ".", "uq"}]}], |

2376 | RowBox[{"6", " ", |

2377 | FormBox[ |

2378 | SubscriptBox["c", "w"], |

2379 | TraditionalForm]}]], "-", |

2380 | FractionBox[ |

2381 | RowBox[{"2", " ", "\[ImaginaryI]", " ", |

2382 | FormBox["e", |

2383 | TraditionalForm], " ", |

2384 | FormBox[ |

2385 | SubscriptBox["B", |

2386 | FormBox["\[Mu]", |

2387 | TraditionalForm]], |

2388 | TraditionalForm], " ", |

2389 | RowBox[{ |

2390 | FormBox[ |

2391 | SubscriptBox["P", "\<\"+\"\>"], |

2392 | TraditionalForm], ".", "uq"}]}], |

2393 | RowBox[{"3", " ", |

2394 | FormBox[ |

2395 | SubscriptBox["c", "w"], |

2396 | TraditionalForm]}]], "-", |

2397 | RowBox[{"\[ImaginaryI]", " ", |

2398 | FormBox[ |

2399 | SubscriptBox["g", "s"], |

2400 | TraditionalForm], " ", |

2401 | RowBox[{ |

2402 | FormBox[ |

2403 | SuperscriptBox["T", "a$865"], |

2404 | TraditionalForm], ".", "uq"}], " ", |

2405 | FormBox[ |

2406 | SubscriptBox["G", |

2407 | RowBox[{ |

2408 | FormBox["\[Mu]", |

2409 | TraditionalForm], ",", "a$865"}]], |

2410 | TraditionalForm]}], "-", |

2411 | FractionBox[ |

2412 | RowBox[{"\[ImaginaryI]", " ", |

2413 | FormBox["e", |

2414 | TraditionalForm], " ", |

2415 | RowBox[{ |

2416 | FormBox[ |

2417 | SubscriptBox["P", "\<\"-\"\>"], |

2418 | TraditionalForm], ".", "uq"}], " ", |

2419 | FormBox[ |

2420 | SubscriptBox["Wi", |

2421 | RowBox[{ |

2422 | FormBox["\[Mu]", |

2423 | TraditionalForm], ",", "3"}]], |

2424 | TraditionalForm]}], |

2425 | RowBox[{"2", " ", |

2426 | FormBox[ |

2427 | SubscriptBox["s", "w"], |

2428 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2429 | RowBox[{ |

2430 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2431 | RowBox[{ |

2432 | FormBox[ |

2433 | OverscriptBox["vl", "\<\"-\"\>"], |

2434 | TraditionalForm], ".", |

2435 | FormBox[ |

2436 | SuperscriptBox["\[Gamma]", |

2437 | FormBox["\[Mu]", |

2438 | TraditionalForm]], |

2439 | TraditionalForm], ".", |

2440 | RowBox[{"(", |

2441 | RowBox[{ |

2442 | FormBox[ |

2443 | RowBox[{ |

2444 | SubscriptBox["\<\"\[PartialD]\"\>", |

2445 | FormBox["\[Nu]", |

2446 | TraditionalForm]], "(", "vl", ")"}], |

2447 | TraditionalForm], "+", |

2448 | FractionBox[ |

2449 | RowBox[{"\[ImaginaryI]", " ", |

2450 | FormBox["e", |

2451 | TraditionalForm], " ", |

2452 | FormBox[ |

2453 | SubscriptBox["B", |

2454 | FormBox["\[Nu]", |

2455 | TraditionalForm]], |

2456 | TraditionalForm], " ", |

2457 | RowBox[{ |

2458 | FormBox[ |

2459 | SubscriptBox["P", "\<\"-\"\>"], |

2460 | TraditionalForm], ".", "vl"}]}], |

2461 | RowBox[{"2", " ", |

2462 | FormBox[ |

2463 | SubscriptBox["c", "w"], |

2464 | TraditionalForm]}]], "-", |

2465 | FractionBox[ |

2466 | RowBox[{"\[ImaginaryI]", " ", |

2467 | FormBox["e", |

2468 | TraditionalForm], " ", |

2469 | RowBox[{ |

2470 | FormBox[ |

2471 | SubscriptBox["P", "\<\"-\"\>"], |

2472 | TraditionalForm], ".", "vl"}], " ", |

2473 | FormBox[ |

2474 | SubscriptBox["Wi", |

2475 | RowBox[{ |

2476 | FormBox["\[Nu]", |

2477 | TraditionalForm], ",", "3"}]], |

2478 | TraditionalForm]}], |

2479 | RowBox[{"2", " ", |

2480 | FormBox[ |

2481 | SubscriptBox["s", "w"], |

2482 | TraditionalForm]}]]}], ")"}]}]}], "+", |

2483 | RowBox[{ |

2484 | FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", |

2485 | RowBox[{ |

2486 | FormBox[ |

2487 | OverscriptBox["vl", "\<\"-\"\>"], |

2488 | TraditionalForm], ".", |

2489 | FormBox[ |

2490 | SuperscriptBox["\[Gamma]", |

2491 | FormBox["\[Nu]", |

2492 | TraditionalForm]], |

2493 | TraditionalForm], ".", |

2494 | RowBox[{"(", |

2495 | RowBox[{ |

2496 | FormBox[ |

2497 | RowBox[{ |

2498 | SubscriptBox["\<\"\[PartialD]\"\>", |

2499 | FormBox["\[Mu]", |

2500 | TraditionalForm]], "(", "vl", ")"}], |

2501 | TraditionalForm], "+", |

2502 | FractionBox[ |

2503 | RowBox[{"\[ImaginaryI]", " ", |

2504 | FormBox["e", |

2505 | TraditionalForm], " ", |

2506 | FormBox[ |

2507 | SubscriptBox["B", |

2508 | FormBox["\[Mu]", |

2509 | TraditionalForm]], |

2510 | TraditionalForm], " ", |

2511 | RowBox[{ |

2512 | FormBox[ |

2513 | SubscriptBox["P", "\<\"-\"\>"], |

2514 | TraditionalForm], ".", "vl"}]}], |

2515 | RowBox[{"2", " ", |

2516 | FormBox[ |

2517 | SubscriptBox["c", "w"], |

2518 | TraditionalForm]}]], "-", |

2519 | FractionBox[ |

2520 | RowBox[{"\[ImaginaryI]", " ", |

2521 | FormBox["e", |

2522 | TraditionalForm], " ", |

2523 | RowBox[{ |

2524 | FormBox[ |

2525 | SubscriptBox["P", "\<\"-\"\>"], |

2526 | TraditionalForm], ".", "vl"}], " ", |

2527 | FormBox[ |

2528 | SubscriptBox["Wi", |

2529 | RowBox[{ |

2530 | FormBox["\[Mu]", |

2531 | TraditionalForm], ",", "3"}]], |

2532 | TraditionalForm]}], |

2533 | RowBox[{"2", " ", |

2534 | FormBox[ |

2535 | SubscriptBox["s", "w"], |

2536 | TraditionalForm]}]]}], ")"}]}]}], "-", |

2537 | RowBox[{ |

2538 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2539 | RowBox[{"(", |

2540 | RowBox[{ |

2541 | RowBox[{ |

2542 | FormBox[ |

2543 | OverscriptBox["dq", "\<\"-\"\>"], |

2544 | TraditionalForm], ".", |

2545 | FormBox[ |

2546 | SuperscriptBox["\[Gamma]", |

2547 | FormBox["\[Nu]", |

2548 | TraditionalForm]], |

2549 | TraditionalForm], ".", |

2550 | FormBox[ |

2551 | RowBox[{ |

2552 | SubscriptBox["\<\"\[PartialD]\"\>", |

2553 | FormBox["\[Mu]", |

2554 | TraditionalForm]], "(", "dq", ")"}], |

2555 | TraditionalForm]}], "+", |

2556 | RowBox[{ |

2557 | FormBox[ |

2558 | RowBox[{ |

2559 | SubscriptBox["\<\"\[PartialD]\"\>", |

2560 | FormBox["\[Mu]", |

2561 | TraditionalForm]], "(", |

2562 | FormBox[ |

2563 | OverscriptBox["dq", "\<\"-\"\>"], |

2564 | TraditionalForm], ")"}], |

2565 | TraditionalForm], ".", |

2566 | FormBox[ |

2567 | SuperscriptBox["\[Gamma]", |

2568 | FormBox["\[Nu]", |

2569 | TraditionalForm]], |

2570 | TraditionalForm], ".", "dq"}]}], ")"}]}], "-", |

2571 | RowBox[{ |

2572 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2573 | RowBox[{"(", |

2574 | RowBox[{ |

2575 | RowBox[{ |

2576 | FormBox[ |

2577 | OverscriptBox["dq", "\<\"-\"\>"], |

2578 | TraditionalForm], ".", |

2579 | FormBox[ |

2580 | SuperscriptBox["\[Gamma]", |

2581 | FormBox["\[Mu]", |

2582 | TraditionalForm]], |

2583 | TraditionalForm], ".", |

2584 | FormBox[ |

2585 | RowBox[{ |

2586 | SubscriptBox["\<\"\[PartialD]\"\>", |

2587 | FormBox["\[Nu]", |

2588 | TraditionalForm]], "(", "dq", ")"}], |

2589 | TraditionalForm]}], "+", |

2590 | RowBox[{ |

2591 | FormBox[ |

2592 | RowBox[{ |

2593 | SubscriptBox["\<\"\[PartialD]\"\>", |

2594 | FormBox["\[Nu]", |

2595 | TraditionalForm]], "(", |

2596 | FormBox[ |

2597 | OverscriptBox["dq", "\<\"-\"\>"], |

2598 | TraditionalForm], ")"}], |

2599 | TraditionalForm], ".", |

2600 | FormBox[ |

2601 | SuperscriptBox["\[Gamma]", |

2602 | FormBox["\[Mu]", |

2603 | TraditionalForm]], |

2604 | TraditionalForm], ".", "dq"}]}], ")"}]}], "-", |

2605 | RowBox[{ |

2606 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2607 | RowBox[{"(", |

2608 | RowBox[{ |

2609 | RowBox[{ |

2610 | FormBox[ |

2611 | OverscriptBox["l", "\<\"-\"\>"], |

2612 | TraditionalForm], ".", |

2613 | FormBox[ |

2614 | SuperscriptBox["\[Gamma]", |

2615 | FormBox["\[Nu]", |

2616 | TraditionalForm]], |

2617 | TraditionalForm], ".", |

2618 | FormBox[ |

2619 | RowBox[{ |

2620 | SubscriptBox["\<\"\[PartialD]\"\>", |

2621 | FormBox["\[Mu]", |

2622 | TraditionalForm]], "(", "l", ")"}], |

2623 | TraditionalForm]}], "+", |

2624 | RowBox[{ |

2625 | FormBox[ |

2626 | RowBox[{ |

2627 | SubscriptBox["\<\"\[PartialD]\"\>", |

2628 | FormBox["\[Mu]", |

2629 | TraditionalForm]], "(", |

2630 | FormBox[ |

2631 | OverscriptBox["l", "\<\"-\"\>"], |

2632 | TraditionalForm], ")"}], |

2633 | TraditionalForm], ".", |

2634 | FormBox[ |

2635 | SuperscriptBox["\[Gamma]", |

2636 | FormBox["\[Nu]", |

2637 | TraditionalForm]], |

2638 | TraditionalForm], ".", "l"}]}], ")"}]}], "-", |

2639 | RowBox[{ |

2640 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2641 | RowBox[{"(", |

2642 | RowBox[{ |

2643 | RowBox[{ |

2644 | FormBox[ |

2645 | OverscriptBox["l", "\<\"-\"\>"], |

2646 | TraditionalForm], ".", |

2647 | FormBox[ |

2648 | SuperscriptBox["\[Gamma]", |

2649 | FormBox["\[Mu]", |

2650 | TraditionalForm]], |

2651 | TraditionalForm], ".", |

2652 | FormBox[ |

2653 | RowBox[{ |

2654 | SubscriptBox["\<\"\[PartialD]\"\>", |

2655 | FormBox["\[Nu]", |

2656 | TraditionalForm]], "(", "l", ")"}], |

2657 | TraditionalForm]}], "+", |

2658 | RowBox[{ |

2659 | FormBox[ |

2660 | RowBox[{ |

2661 | SubscriptBox["\<\"\[PartialD]\"\>", |

2662 | FormBox["\[Nu]", |

2663 | TraditionalForm]], "(", |

2664 | FormBox[ |

2665 | OverscriptBox["l", "\<\"-\"\>"], |

2666 | TraditionalForm], ")"}], |

2667 | TraditionalForm], ".", |

2668 | FormBox[ |

2669 | SuperscriptBox["\[Gamma]", |

2670 | FormBox["\[Mu]", |

2671 | TraditionalForm]], |

2672 | TraditionalForm], ".", "l"}]}], ")"}]}], "-", |

2673 | RowBox[{ |

2674 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2675 | RowBox[{"(", |

2676 | RowBox[{ |

2677 | RowBox[{ |

2678 | FormBox[ |

2679 | OverscriptBox["uq", "\<\"-\"\>"], |

2680 | TraditionalForm], ".", |

2681 | FormBox[ |

2682 | SuperscriptBox["\[Gamma]", |

2683 | FormBox["\[Nu]", |

2684 | TraditionalForm]], |

2685 | TraditionalForm], ".", |

2686 | FormBox[ |

2687 | RowBox[{ |

2688 | SubscriptBox["\<\"\[PartialD]\"\>", |

2689 | FormBox["\[Mu]", |

2690 | TraditionalForm]], "(", "uq", ")"}], |

2691 | TraditionalForm]}], "+", |

2692 | RowBox[{ |

2693 | FormBox[ |

2694 | RowBox[{ |

2695 | SubscriptBox["\<\"\[PartialD]\"\>", |

2696 | FormBox["\[Mu]", |

2697 | TraditionalForm]], "(", |

2698 | FormBox[ |

2699 | OverscriptBox["uq", "\<\"-\"\>"], |

2700 | TraditionalForm], ")"}], |

2701 | TraditionalForm], ".", |

2702 | FormBox[ |

2703 | SuperscriptBox["\[Gamma]", |

2704 | FormBox["\[Nu]", |

2705 | TraditionalForm]], |

2706 | TraditionalForm], ".", "uq"}]}], ")"}]}], "-", |

2707 | RowBox[{ |

2708 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2709 | RowBox[{"(", |

2710 | RowBox[{ |

2711 | RowBox[{ |

2712 | FormBox[ |

2713 | OverscriptBox["uq", "\<\"-\"\>"], |

2714 | TraditionalForm], ".", |

2715 | FormBox[ |

2716 | SuperscriptBox["\[Gamma]", |

2717 | FormBox["\[Mu]", |

2718 | TraditionalForm]], |

2719 | TraditionalForm], ".", |

2720 | FormBox[ |

2721 | RowBox[{ |

2722 | SubscriptBox["\<\"\[PartialD]\"\>", |

2723 | FormBox["\[Nu]", |

2724 | TraditionalForm]], "(", "uq", ")"}], |

2725 | TraditionalForm]}], "+", |

2726 | RowBox[{ |

2727 | FormBox[ |

2728 | RowBox[{ |

2729 | SubscriptBox["\<\"\[PartialD]\"\>", |

2730 | FormBox["\[Nu]", |

2731 | TraditionalForm]], "(", |

2732 | FormBox[ |

2733 | OverscriptBox["uq", "\<\"-\"\>"], |

2734 | TraditionalForm], ")"}], |

2735 | TraditionalForm], ".", |

2736 | FormBox[ |

2737 | SuperscriptBox["\[Gamma]", |

2738 | FormBox["\[Mu]", |

2739 | TraditionalForm]], |

2740 | TraditionalForm], ".", "uq"}]}], ")"}]}], "-", |

2741 | RowBox[{ |

2742 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2743 | RowBox[{"(", |

2744 | RowBox[{ |

2745 | RowBox[{ |

2746 | FormBox[ |

2747 | OverscriptBox["vl", "\<\"-\"\>"], |

2748 | TraditionalForm], ".", |

2749 | FormBox[ |

2750 | SuperscriptBox["\[Gamma]", |

2751 | FormBox["\[Nu]", |

2752 | TraditionalForm]], |

2753 | TraditionalForm], ".", |

2754 | FormBox[ |

2755 | RowBox[{ |

2756 | SubscriptBox["\<\"\[PartialD]\"\>", |

2757 | FormBox["\[Mu]", |

2758 | TraditionalForm]], "(", "vl", ")"}], |

2759 | TraditionalForm]}], "+", |

2760 | RowBox[{ |

2761 | FormBox[ |

2762 | RowBox[{ |

2763 | SubscriptBox["\<\"\[PartialD]\"\>", |

2764 | FormBox["\[Mu]", |

2765 | TraditionalForm]], "(", |

2766 | FormBox[ |

2767 | OverscriptBox["vl", "\<\"-\"\>"], |

2768 | TraditionalForm], ")"}], |

2769 | TraditionalForm], ".", |

2770 | FormBox[ |

2771 | SuperscriptBox["\[Gamma]", |

2772 | FormBox["\[Nu]", |

2773 | TraditionalForm]], |

2774 | TraditionalForm], ".", "vl"}]}], ")"}]}], "-", |

2775 | RowBox[{ |

2776 | FractionBox["1", "4"], " ", "\[ImaginaryI]", " ", |

2777 | RowBox[{"(", |

2778 | RowBox[{ |

2779 | RowBox[{ |

2780 | FormBox[ |

2781 | OverscriptBox["vl", "\<\"-\"\>"], |

2782 | TraditionalForm], ".", |

2783 | FormBox[ |

2784 | SuperscriptBox["\[Gamma]", |

2785 | FormBox["\[Mu]", |

2786 | TraditionalForm]], |

2787 | TraditionalForm], ".", |

2788 | FormBox[ |

2789 | RowBox[{ |

2790 | SubscriptBox["\<\"\[PartialD]\"\>", |

2791 | FormBox["\[Nu]", |

2792 | TraditionalForm]], "(", "vl", ")"}], |

2793 | TraditionalForm]}], "+", |

2794 | RowBox[{ |

2795 | FormBox[ |

2796 | RowBox[{ |

2797 | SubscriptBox["\<\"\[PartialD]\"\>", |

2798 | FormBox["\[Nu]", |

2799 | TraditionalForm]], "(", |

2800 | FormBox[ |

2801 | OverscriptBox["vl", "\<\"-\"\>"], |

2802 | TraditionalForm], ")"}], |

2803 | TraditionalForm], ".", |

2804 | FormBox[ |

2805 | SuperscriptBox["\[Gamma]", |

2806 | FormBox["\[Mu]", |

2807 | TraditionalForm]], |

2808 | TraditionalForm], ".", "vl"}]}], ")"}]}], "-", |

2809 | RowBox[{ |

2810 | FractionBox["1", |

2811 | RowBox[{ |

2812 | SqrtBox["2"], " ", |

2813 | FormBox[ |

2814 | SubscriptBox["s", "w"], |

2815 | TraditionalForm]}]], |

2816 | RowBox[{ |

2817 | FormBox["e", |

2818 | TraditionalForm], " ", |

2819 | RowBox[{"(", |

2820 | RowBox[{ |

2821 | RowBox[{"CKM", " ", |

2822 | RowBox[{ |

2823 | FormBox[ |

2824 | OverscriptBox["uq", "\<\"-\"\>"], |

2825 | TraditionalForm], ".", |

2826 | FormBox[ |

2827 | SuperscriptBox["\[Gamma]", |

2828 | FormBox["\[Nu]", |

2829 | TraditionalForm]], |

2830 | TraditionalForm], ".", |

2831 | FormBox[ |

2832 | SubscriptBox["P", "\<\"-\"\>"], |

2833 | TraditionalForm], ".", "dq"}], " ", |

2834 | FormBox[ |

2835 | SubscriptBox["W", |

2836 | FormBox["\[Mu]", |

2837 | TraditionalForm]], |

2838 | TraditionalForm]}], "+", |

2839 | RowBox[{ |

2840 | RowBox[{ |

2841 | FormBox[ |

2842 | OverscriptBox["vl", "\<\"-\"\>"], |

2843 | TraditionalForm], ".", |

2844 | FormBox[ |

2845 | SuperscriptBox["\[Gamma]", |

2846 | FormBox["\[Nu]", |

2847 | TraditionalForm]], |

2848 | TraditionalForm], ".", |

2849 | FormBox[ |

2850 | SubscriptBox["P", "\<\"-\"\>"], |

2851 | TraditionalForm], ".", "l"}], " ", |

2852 | FormBox[ |

2853 | SubscriptBox["W", |

2854 | FormBox["\[Mu]", |

2855 | TraditionalForm]], |

2856 | TraditionalForm]}], "+", |

2857 | RowBox[{"CKM", " ", |

2858 | RowBox[{ |

2859 | FormBox[ |

2860 | OverscriptBox["uq", "\<\"-\"\>"], |

2861 | TraditionalForm], ".", |

2862 | FormBox[ |

2863 | SuperscriptBox["\[Gamma]", |

2864 | FormBox["\[Mu]", |

2865 | TraditionalForm]], |

2866 | TraditionalForm], ".", |

2867 | FormBox[ |

2868 | SubscriptBox["P", "\<\"-\"\>"], |

2869 | TraditionalForm], ".", "dq"}], " ", |

2870 | FormBox[ |

2871 | SubscriptBox["W", |

2872 | FormBox["\[Nu]", |

2873 | TraditionalForm]], |

2874 | TraditionalForm]}], "+", |

2875 | RowBox[{ |

2876 | RowBox[{ |

2877 | FormBox[ |

2878 | OverscriptBox["vl", "\<\"-\"\>"], |

2879 | TraditionalForm], ".", |

2880 | FormBox[ |

2881 | SuperscriptBox["\[Gamma]", |

2882 | FormBox["\[Mu]", |

2883 | TraditionalForm]], |

2884 | TraditionalForm], ".", |

2885 | FormBox[ |

2886 | SubscriptBox["P", "\<\"-\"\>"], |

2887 | TraditionalForm], ".", "l"}], " ", |

2888 | FormBox[ |

2889 | SubscriptBox["W", |

2890 | FormBox["\[Nu]", |

2891 | TraditionalForm]], |

2892 | TraditionalForm]}], "+", |

2893 | RowBox[{ |

2894 | RowBox[{ |

2895 | FormBox[ |

2896 | OverscriptBox["l", "\<\"-\"\>"], |

2897 | TraditionalForm], ".", |

2898 | FormBox[ |

2899 | SuperscriptBox["\[Gamma]", |

2900 | FormBox["\[Nu]", |

2901 | TraditionalForm]], |

2902 | TraditionalForm], ".", |

2903 | FormBox[ |

2904 | SubscriptBox["P", "\<\"-\"\>"], |

2905 | TraditionalForm], ".", "vl"}], " ", |

2906 | FormBox[ |

2907 | SubsuperscriptBox["W", |

2908 | FormBox["\[Mu]", |

2909 | TraditionalForm], "\[Dagger]"], |

2910 | TraditionalForm]}], "+", |

2911 | RowBox[{ |

2912 | RowBox[{ |

2913 | FormBox[ |

2914 | OverscriptBox["dq", "\<\"-\"\>"], |

2915 | TraditionalForm], ".", |

2916 | FormBox[ |

2917 | SuperscriptBox["\[Gamma]", |

2918 | FormBox["\[Nu]", |

2919 | TraditionalForm]], |

2920 | TraditionalForm], ".", |

2921 | FormBox[ |

2922 | SubscriptBox["P", "\<\"-\"\>"], |

2923 | TraditionalForm], ".", "uq"}], " ", |

2924 | FormBox[ |

2925 | SuperscriptBox["CKM", "\[Dagger]"], |

2926 | TraditionalForm], " ", |

2927 | FormBox[ |

2928 | SubsuperscriptBox["W", |

2929 | FormBox["\[Mu]", |

2930 | TraditionalForm], "\[Dagger]"], |

2931 | TraditionalForm]}], "+", |

2932 | RowBox[{ |

2933 | RowBox[{ |

2934 | FormBox[ |

2935 | OverscriptBox["l", "\<\"-\"\>"], |

2936 | TraditionalForm], ".", |

2937 | FormBox[ |

2938 | SuperscriptBox["\[Gamma]", |

2939 | FormBox["\[Mu]", |

2940 | TraditionalForm]], |

2941 | TraditionalForm], ".", |

2942 | FormBox[ |

2943 | SubscriptBox["P", "\<\"-\"\>"], |

2944 | TraditionalForm], ".", "vl"}], " ", |

2945 | FormBox[ |

2946 | SubsuperscriptBox["W", |

2947 | FormBox["\[Nu]", |

2948 | TraditionalForm], "\[Dagger]"], |

2949 | TraditionalForm]}], "+", |

2950 | RowBox[{ |

2951 | RowBox[{ |

2952 | FormBox[ |

2953 | OverscriptBox["dq", "\<\"-\"\>"], |

2954 | TraditionalForm], ".", |

2955 | FormBox[ |

2956 | SuperscriptBox["\[Gamma]", |

2957 | FormBox["\[Mu]", |

2958 | TraditionalForm]], |

2959 | TraditionalForm], ".", |

2960 | FormBox[ |

2961 | SubscriptBox["P", "\<\"-\"\>"], |

2962 | TraditionalForm], ".", "uq"}], " ", |

2963 | FormBox[ |

2964 | SuperscriptBox["CKM", "\[Dagger]"], |

2965 | TraditionalForm], " ", |

2966 | FormBox[ |

2967 | SubsuperscriptBox["W", |

2968 | FormBox["\[Nu]", |

2969 | TraditionalForm], "\[Dagger]"], |

2970 | TraditionalForm]}]}], ")"}]}]}]}], ")"}]}]}], |

2971 | TraditionalForm]], "Output", |

2972 | CellChangeTimes->{3.45406122390963*^9, 3.4953404903989077`*^9, |

2973 | 3.495346922245199*^9, 3.495347037742717*^9}] |

2974 | }, Open ]] |

2975 | }, Closed]], |

2976 | |

2977 | Cell[CellGroupData[{ |

2978 | |

2979 | Cell["Yukawa sector", "Subsubsection", |

2980 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

2981 | 3.411910393742139*^9, 3.411910394852953*^9}}], |

2982 | |

2983 | Cell[CellGroupData[{ |

2984 | |

2985 | Cell[BoxData["LagY"], "Input", |

2986 | CellChangeTimes->{{3.411910181169772*^9, 3.411910184667088*^9}, { |

2987 | 3.4119104032372026`*^9, 3.411910404165523*^9}, 3.4540523167591047`*^9, { |

2988 | 3.454057108491197*^9, 3.4540571095455637`*^9}, 3.454061225806781*^9}], |

2989 | |

2990 | Cell[BoxData[ |

2991 | FormBox[ |

2992 | RowBox[{ |

2993 | FractionBox["1", "2"], " ", |

2994 | FormBox["\[Kappa]", |

2995 | TraditionalForm], " ", |

2996 | RowBox[{ |

2997 | FormBox[ |

2998 | SubscriptBox["h", |

2999 | RowBox[{ |

3000 | FormBox["\[Mu]", |

3001 | TraditionalForm], ",", |

3002 | FormBox["\[Nu]", |

3003 | TraditionalForm]}]], |

3004 | TraditionalForm], ".", |

3005 | FormBox[ |

3006 | SubscriptBox["\[Eta]", |

3007 | RowBox[{ |

3008 | FormBox[ |

3009 | FormBox["\[Mu]", |

3010 | TraditionalForm], |

3011 | TraditionalForm], ",", |

3012 | FormBox[ |

3013 | FormBox["\[Nu]", |

3014 | TraditionalForm], |

3015 | TraditionalForm]}]], |

3016 | TraditionalForm], ".", |

3017 | RowBox[{"(", |

3018 | RowBox[{ |

3019 | RowBox[{"-", |

3020 | FractionBox[ |

3021 | RowBox[{ |

3022 | RowBox[{"(", |

3023 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3024 | FormBox[ |

3025 | SubscriptBox["yd", "n$874"], |

3026 | TraditionalForm], " ", |

3027 | FormBox[ |

3028 | SubscriptBox[ |

3029 | RowBox[{"(", |

3030 | SubscriptBox["P", "\<\"+\"\>"], ")"}], |

3031 | RowBox[{"s$874", ",", "r$874"}]], |

3032 | TraditionalForm], " ", |

3033 | RowBox[{ |

3034 | FormBox[ |

3035 | SubscriptBox[ |

3036 | OverscriptBox["dq", "\<\"-\"\>"], |

3037 | RowBox[{"s$874", ",", "n$874", ",", "i$874"}]], |

3038 | TraditionalForm], ".", |

3039 | FormBox[ |

3040 | SubscriptBox["dq", |

3041 | RowBox[{"r$874", ",", "n$874", ",", "i$874"}]], |

3042 | TraditionalForm]}]}], |

3043 | SqrtBox["2"]]}], "-", |

3044 | FractionBox[ |

3045 | RowBox[{ |

3046 | RowBox[{"(", |

3047 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3048 | FormBox[ |

3049 | SubscriptBox["yu", "n$874"], |

3050 | TraditionalForm], " ", |

3051 | FormBox[ |

3052 | SubscriptBox[ |

3053 | RowBox[{"(", |

3054 | SubscriptBox["P", "\<\"+\"\>"], ")"}], |

3055 | RowBox[{"s$874", ",", "r$874"}]], |

3056 | TraditionalForm], " ", |

3057 | RowBox[{ |

3058 | FormBox[ |

3059 | SubscriptBox[ |

3060 | OverscriptBox["uq", "\<\"-\"\>"], |

3061 | RowBox[{"s$874", ",", "n$874", ",", "i$874"}]], |

3062 | TraditionalForm], ".", |

3063 | FormBox[ |

3064 | SubscriptBox["uq", |

3065 | RowBox[{"r$874", ",", "n$874", ",", "i$874"}]], |

3066 | TraditionalForm]}]}], |

3067 | SqrtBox["2"]], "-", |

3068 | FractionBox[ |

3069 | RowBox[{ |

3070 | RowBox[{"(", |

3071 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3072 | FormBox[ |

3073 | SubscriptBox["yl", "n$874"], |

3074 | TraditionalForm], " ", |

3075 | FormBox[ |

3076 | SubscriptBox[ |

3077 | RowBox[{"(", |

3078 | SubscriptBox["P", "\<\"+\"\>"], ")"}], |

3079 | RowBox[{"s$874", ",", "r$874"}]], |

3080 | TraditionalForm], " ", |

3081 | RowBox[{ |

3082 | FormBox[ |

3083 | SubscriptBox[ |

3084 | OverscriptBox["l", "\<\"-\"\>"], |

3085 | RowBox[{"s$874", ",", "n$874"}]], |

3086 | TraditionalForm], ".", |

3087 | FormBox[ |

3088 | SubscriptBox["l", |

3089 | RowBox[{"r$874", ",", "n$874"}]], |

3090 | TraditionalForm]}]}], |

3091 | SqrtBox["2"]], "-", |

3092 | FractionBox[ |

3093 | RowBox[{ |

3094 | RowBox[{"(", |

3095 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3096 | FormBox[ |

3097 | SubscriptBox["yd", "n$875"], |

3098 | TraditionalForm], " ", |

3099 | FormBox[ |

3100 | SubscriptBox[ |

3101 | RowBox[{"(", |

3102 | SubscriptBox["P", "\<\"-\"\>"], ")"}], |

3103 | RowBox[{"r$876", ",", "r$877"}]], |

3104 | TraditionalForm], " ", |

3105 | RowBox[{ |

3106 | FormBox[ |

3107 | SubscriptBox[ |

3108 | OverscriptBox["dq", "\<\"-\"\>"], |

3109 | RowBox[{"r$876", ",", "n$875", ",", "i$875"}]], |

3110 | TraditionalForm], ".", |

3111 | FormBox[ |

3112 | SubscriptBox["dq", |

3113 | RowBox[{"r$877", ",", "n$875", ",", "i$875"}]], |

3114 | TraditionalForm]}]}], |

3115 | SqrtBox["2"]], "-", |

3116 | FractionBox[ |

3117 | RowBox[{ |

3118 | RowBox[{"(", |

3119 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3120 | FormBox[ |

3121 | SubscriptBox["yu", "n$875"], |

3122 | TraditionalForm], " ", |

3123 | FormBox[ |

3124 | SubscriptBox[ |

3125 | RowBox[{"(", |

3126 | SubscriptBox["P", "\<\"-\"\>"], ")"}], |

3127 | RowBox[{"r$880", ",", "r$881"}]], |

3128 | TraditionalForm], " ", |

3129 | RowBox[{ |

3130 | FormBox[ |

3131 | SubscriptBox[ |

3132 | OverscriptBox["uq", "\<\"-\"\>"], |

3133 | RowBox[{"r$880", ",", "n$875", ",", "i$875"}]], |

3134 | TraditionalForm], ".", |

3135 | FormBox[ |

3136 | SubscriptBox["uq", |

3137 | RowBox[{"r$881", ",", "n$875", ",", "i$875"}]], |

3138 | TraditionalForm]}]}], |

3139 | SqrtBox["2"]], "-", |

3140 | FractionBox[ |

3141 | RowBox[{ |

3142 | RowBox[{"(", |

3143 | RowBox[{"H", "+", "v"}], ")"}], " ", |

3144 | FormBox[ |

3145 | SubscriptBox["yl", "n$875"], |

3146 | TraditionalForm], " ", |

3147 | FormBox[ |

3148 | SubscriptBox[ |

3149 | RowBox[{"(", |

3150 | SubscriptBox["P", "\<\"-\"\>"], ")"}], |

3151 | RowBox[{"r$878", ",", "r$879"}]], |

3152 | TraditionalForm], " ", |

3153 | RowBox[{ |

3154 | FormBox[ |

3155 | SubscriptBox[ |

3156 | OverscriptBox["l", "\<\"-\"\>"], |

3157 | RowBox[{"r$878", ",", "n$875"}]], |

3158 | TraditionalForm], ".", |

3159 | FormBox[ |

3160 | SubscriptBox["l", |

3161 | RowBox[{"r$879", ",", "n$875"}]], |

3162 | TraditionalForm]}]}], |

3163 | SqrtBox["2"]]}], ")"}]}]}], TraditionalForm]], "Output", |

3164 | CellChangeTimes->{3.454061226531508*^9, 3.495340493136104*^9, |

3165 | 3.495346923847036*^9, 3.495347038901807*^9}] |

3166 | }, Open ]] |

3167 | }, Closed]] |

3168 | }, Open ]], |

3169 | |

3170 | Cell[CellGroupData[{ |

3171 | |

3172 | Cell["Writing the UFO output", "Section", |

3173 | CellChangeTimes->{{3.411910065227421*^9, 3.411910071535137*^9}, { |

3174 | 3.4540507294896593`*^9, 3.4540507310208197`*^9}, {3.4540567139322166`*^9, |

3175 | 3.454056718777896*^9}, {3.506078608080686*^9, 3.5060786082497253`*^9}, { |

3176 | 3.5060799230526752`*^9, 3.5060799363480167`*^9}}], |

3177 | |

3178 | Cell[CellGroupData[{ |

3179 | |

3180 | Cell[BoxData[ |

3181 | RowBox[{"WriteUFO", "[", "LagTot", "]"}]], "Input", |

3182 | CellChangeTimes->{{3.51046201716608*^9, 3.510462025552577*^9}, { |

3183 | 3.510469689419868*^9, 3.510469693314324*^9}, 3.5104711819285088`*^9, { |

3184 | 3.510474892840777*^9, 3.510474894023183*^9}, {3.510476429769678*^9, |

3185 | 3.510476432615822*^9}, 3.510476838253001*^9, 3.51047774111578*^9, { |

3186 | 3.5104779227496023`*^9, 3.510477924730214*^9}, {3.510483810424922*^9, |

3187 | 3.5104838363606243`*^9}, {3.510484273529469*^9, 3.510484274820273*^9}, |

3188 | 3.51048449558997*^9, {3.5104847616969843`*^9, 3.5104847635424843`*^9}, { |

3189 | 3.510485046614109*^9, 3.5104850520107203`*^9}, {3.510487302176343*^9, |

3190 | 3.5104873063165283`*^9}, {3.5105496860755444`*^9, |

3191 | 3.5105496897703333`*^9}, {3.510997086990488*^9, 3.510997096387805*^9}, |

3192 | 3.5110721954671297`*^9, {3.511081709588459*^9, 3.511081716673902*^9}, |

3193 | 3.5111509125281267`*^9}], |

3194 | |

3195 | Cell[CellGroupData[{ |

3196 | |

3197 | Cell[BoxData[ |

3198 | FormBox["\<\" --- Universal FeynRules Output (UFO) v 1.1 ---\"\>", |

3199 | TraditionalForm]], "Print", |

3200 | CellChangeTimes->CompressedData[" |

3201 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3202 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3203 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3204 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3205 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3206 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIO1wZud5 |

3207 | hbJXjgDPMJ4N |

3208 | "]], |

3209 | |

3210 | Cell[BoxData[ |

3211 | FormBox["\<\"Starting Feynman rule calculation.\"\>", |

3212 | TraditionalForm]], "Print", |

3213 | CellChangeTimes->CompressedData[" |

3214 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3215 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3216 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3217 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3218 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3219 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIG0Sce68 |

3220 | QtkrRwDMIp2i |

3221 | "]], |

3222 | |

3223 | Cell[BoxData[ |

3224 | FormBox["\<\"Collecting the different structures that enter the \ |

3225 | vertex...\"\>", TraditionalForm]], "Print", |

3226 | CellChangeTimes->CompressedData[" |

3227 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3228 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3229 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3230 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3231 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3232 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfkLmamy4q |

3233 | lL1yBADL452O |

3234 | "]], |

3235 | |

3236 | Cell[BoxData[ |

3237 | FormBox[ |

3238 | InterpretationBox[ |

3239 | RowBox[{"\<\"Found \"\>", "\[InvisibleSpace]", "\<\"69\"\>", |

3240 | "\[InvisibleSpace]", "\<\" possible non zero vertices.\"\>"}], |

3241 | SequenceForm["Found ", "69", " possible non zero vertices."], |

3242 | Editable->False], TraditionalForm]], "Print", |

3243 | CellChangeTimes->CompressedData[" |

3244 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3245 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3246 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3247 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3248 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3249 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIG2w9vJF |

3250 | hbJXjgDOfZ36 |

3251 | "]], |

3252 | |

3253 | Cell[BoxData[ |

3254 | FormBox["\<\"Start calculating vertices...\"\>", TraditionalForm]], "Print", |

3255 | CellChangeTimes->CompressedData[" |

3256 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3257 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3258 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3259 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3260 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3261 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIC0Qe+Wi |

3262 | QtkrRwDLU52L |

3263 | "]], |

3264 | |

3265 | Cell[BoxData[ |

3266 | FormBox[ |

3267 | ProgressIndicatorBox[Dynamic[PRIVATE`progress$1066]], |

3268 | TraditionalForm]], "Print", |

3269 | CellChangeTimes->CompressedData[" |

3270 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3271 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3272 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3273 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3274 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3275 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIP3u/dWL |

3276 | CmWvHAHWR578 |

3277 | "]], |

3278 | |

3279 | Cell[BoxData[ |

3280 | FormBox[ |

3281 | InterpretationBox[ |

3282 | RowBox[{"69", "\[InvisibleSpace]", "\<\" vertices obtained.\"\>"}], |

3283 | SequenceForm[69, " vertices obtained."], |

3284 | Editable->False], TraditionalForm]], "Print", |

3285 | CellChangeTimes->CompressedData[" |

3286 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3287 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3288 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3289 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3290 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3291 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIK0+Je2q |

3292 | QtkrRwDLDJ1v |

3293 | "]], |

3294 | |

3295 | Cell[BoxData[ |

3296 | FormBox["\<\" - Saved vertices in InterfaceRun[ 1 ].\"\>", |

3297 | TraditionalForm]], "Print", |

3298 | CellChangeTimes->CompressedData[" |

3299 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3300 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3301 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3302 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3303 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3304 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIJ3Buuqa |

3305 | QtkrRwDKyJ1m |

3306 | "]], |

3307 | |

3308 | Cell[BoxData[ |

3309 | FormBox["\<\"Preparing Python output.\"\>", TraditionalForm]], "Print", |

3310 | CellChangeTimes->CompressedData[" |

3311 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3312 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3313 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3314 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3315 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3316 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIB2Vsvqa |

3317 | QtkrRwDM9524 |

3318 | "]], |

3319 | |

3320 | Cell[BoxData[ |

3321 | FormBox["\<\" - Splitting vertices into building blocks.\"\>", |

3322 | TraditionalForm]], "Print", |

3323 | CellChangeTimes->CompressedData[" |

3324 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3325 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3326 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3327 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3328 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3329 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIP1z/s1r |

3330 | CmWvHAHUoJ7A |

3331 | "]], |

3332 | |

3333 | Cell[BoxData[ |

3334 | FormBox[ |

3335 | InterpretationBox[ |

3336 | RowBox[{"\<\" - Optimizing: \"\>", "\[InvisibleSpace]", |

3337 | DynamicBox[ToBoxes[PRIVATE`PY$SplitVertexCounter, TraditionalForm], |

3338 | ImageSizeCache->{24., {1., 12.}}], "\[InvisibleSpace]", "\<\"/\"\>", |

3339 | "\[InvisibleSpace]", "165", "\[InvisibleSpace]", "\<\" .\"\>"}], |

3340 | SequenceForm[" - Optimizing: ", |

3341 | Dynamic[PRIVATE`PY$SplitVertexCounter], "/", 165, " ."], |

3342 | Editable->False], TraditionalForm]], "Print", |

3343 | CellChangeTimes->CompressedData[" |

3344 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3345 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3346 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3347 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3348 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3349 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIL3k8P9r |

3350 | CmWvHAHT2J61 |

3351 | "]], |

3352 | |

3353 | Cell[BoxData[ |

3354 | FormBox["\<\" - Writing files.\"\>", TraditionalForm]], "Print", |

3355 | CellChangeTimes->CompressedData[" |

3356 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3357 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3358 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3359 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3360 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3361 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIC2wle+6 |

3362 | QtkrRwDJNZ0j |

3363 | "]], |

3364 | |

3365 | Cell[BoxData[ |

3366 | FormBox["\<\"Done!\"\>", TraditionalForm]], "Print", |

3367 | CellChangeTimes->CompressedData[" |

3368 | 1:eJxTTMoPSmVkYGDQAOJZXV4n16i/clRmm8a7Fkj/2LTdaz2QXpnN2bEBSE9o |

3369 | Pu+4EUgHdb8S3AykVwmxa4FordSQeSC6x9LmEoj+tn0G6xYgHVJytBRERxru |

3370 | 7gHR793OrgTRc+r7CrYDadNl05aB6LjFCYdA9L49kx+D6HzLNew7QPZmTlTc |

3371 | CaT9ppdUXgfSEqVh00G08T27DSC6fUbKaRDd9zPrEYgu8ZP9A6I3iFzvc9V4 |

3372 | 5SgSNFehEUgzeFhNawPSmTtOPwXRCU8esLUD6RvNapogerd0mCeIVqn82Aii |

3373 | wxIXrAPRDS1zZXqB9AbLTN5NQHqK6KQd14D0DyWr+NtA+qi2vsZfIC21Qfy6 |

3374 | QtkrRwDJmJ0x |

3375 | "]] |

3376 | }, Open ]] |

3377 | }, Open ]] |

3378 | }, Open ]], |

3379 | |

3380 | Cell[CellGroupData[{ |

3381 | |

3382 | Cell["Calculation of the Feynman Rules", "Section", |

3383 | CellChangeTimes->{{3.4050095696734943`*^9, 3.4050095702696466`*^9}, { |

3384 | 3.449909557093049*^9, 3.449909562576384*^9}, 3.452923012401949*^9, { |

3385 | 3.45405673743528*^9, 3.4540567428169327`*^9}}], |

3386 | |

3387 | Cell[CellGroupData[{ |

3388 | |

3389 | Cell["Gauge sector", "Subsubsection", |

3390 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

3391 | 3.454057138248085*^9, 3.454057139479412*^9}}], |

3392 | |

3393 | Cell[BoxData[ |

3394 | RowBox[{"FeynmanRules", "[", |

3395 | RowBox[{"LagG", ",", " ", |

3396 | RowBox[{"FlavorExpand", "\[Rule]", " ", "True"}]}], "]"}]], "Input", |

3397 | CellChangeTimes->{{3.45406138410235*^9, 3.454061389893989*^9}}] |

3398 | }, Open ]], |

3399 | |

3400 | Cell[CellGroupData[{ |

3401 | |

3402 | Cell["Scalar sector", "Subsubsection", |

3403 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

3404 | 3.411910274288354*^9, 3.41191027703699*^9}}], |

3405 | |

3406 | Cell[BoxData[ |

3407 | RowBox[{"FeynmanRules", "[", "LagH", "]"}]], "Input", |

3408 | CellChangeTimes->{{3.454061456389081*^9, 3.454061463346387*^9}}] |

3409 | }, Open ]], |

3410 | |

3411 | Cell[CellGroupData[{ |

3412 | |

3413 | Cell["Fermion sector", "Subsubsection", |

3414 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

3415 | 3.4119103528868923`*^9, 3.411910357404933*^9}}], |

3416 | |

3417 | Cell[BoxData[ |

3418 | RowBox[{"FeynmanRules", "[", "LagF", "]"}]], "Input", |

3419 | CellChangeTimes->{{3.454056857284236*^9, 3.4540568672993917`*^9}, |

3420 | 3.4540569533264227`*^9, {3.4540571289311743`*^9, 3.4540571290168457`*^9}, { |

3421 | 3.454061235719533*^9, 3.45406124186089*^9}}] |

3422 | }, Open ]], |

3423 | |

3424 | Cell[CellGroupData[{ |

3425 | |

3426 | Cell["Yukawa sector", "Subsubsection", |

3427 | CellChangeTimes->{{3.4119102216473637`*^9, 3.411910224608881*^9}, { |

3428 | 3.411910393742139*^9, 3.411910394852953*^9}}], |

3429 | |

3430 | Cell[BoxData[ |

3431 | RowBox[{"FeynmanRules", "[", "LagY", "]"}]], "Input", |

3432 | CellChangeTimes->{{3.454061488319646*^9, 3.454061493153029*^9}}] |

3433 | }, Open ]], |

3434 | |

3435 | Cell[CellGroupData[{ |

3436 | |

3437 | Cell["The MUED total Lagrangian", "Subsubsection", |

3438 | CellChangeTimes->{{3.452857023659556*^9, 3.452857026196998*^9}, { |

3439 | 3.454050603115306*^9, 3.454050604633585*^9}, {3.4540508481103973`*^9, |

3440 | 3.454050850614224*^9}}], |

3441 | |

3442 | Cell[BoxData[ |

3443 | RowBox[{"FeynmanRules", "[", |

3444 | RowBox[{"LagTot", ",", " ", |

3445 | RowBox[{"ScreenOutput", "\[Rule]", " ", "False"}]}], "]"}]], "Input", |

3446 | CellChangeTimes->{{3.454056821219754*^9, 3.4540568403918133`*^9}, { |

3447 | 3.454057126321587*^9, 3.454057148256241*^9}, {3.454061660010816*^9, |

3448 | 3.454061677201768*^9}, {3.551594470270935*^9, 3.551594482397746*^9}}] |

3449 | }, Open ]] |

3450 | }, Open ]] |

3451 | }, Open ]] |

3452 | }, |

3453 | WindowSize->{986, 674}, |

3454 | WindowMargins->{{Automatic, 40}, {Automatic, 0}}, |

3455 | PrintingCopies->1, |

3456 | PrintingPageRange->{1, Automatic}, |

3457 | ShowSelection->True, |

3458 | Magnification->1., |

3459 | FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (November 10, 2008)", |

3460 | StyleDefinitions->"Default.nb" |

3461 | ] |

3462 | (* End of Notebook Content *) |

3463 | |

3464 | (* Internal cache information *) |

3465 | (*CellTagsOutline |

3466 | CellTagsIndex->{} |

3467 | *) |

3468 | (*CellTagsIndex |

3469 | CellTagsIndex->{} |

3470 | *) |

3471 | (*NotebookFileOutline |

3472 | Notebook[{ |

3473 | Cell[CellGroupData[{ |

3474 | Cell[567, 22, 321, 4, 76, "Title"], |

3475 | Cell[CellGroupData[{ |

3476 | Cell[913, 30, 114, 1, 67, "Section"], |

3477 | Cell[1030, 33, 120, 2, 31, "Input"], |

3478 | Cell[CellGroupData[{ |

3479 | Cell[1175, 39, 1034, 19, 72, "Input"], |

3480 | Cell[CellGroupData[{ |

3481 | Cell[2234, 62, 606, 9, 24, "Print"], |

3482 | Cell[2843, 73, 884, 16, 24, "Print"], |

3483 | Cell[3730, 91, 648, 10, 24, "Print"], |

3484 | Cell[4381, 103, 592, 9, 24, "Print"], |

3485 | Cell[4976, 114, 660, 10, 24, "Print"], |

3486 | Cell[5639, 126, 624, 10, 24, "Print"], |

3487 | Cell[6266, 138, 590, 9, 24, "Print"], |

3488 | Cell[6859, 149, 657, 10, 24, "Print"] |

3489 | }, Open ]] |

3490 | }, Open ]] |

3491 | }, Open ]], |

3492 | Cell[CellGroupData[{ |

3493 | Cell[7577, 166, 209, 3, 67, "Section"], |

3494 | Cell[CellGroupData[{ |

3495 | Cell[7811, 173, 415, 6, 31, "Input"], |

3496 | Cell[CellGroupData[{ |

3497 | Cell[8251, 183, 1583, 24, 24, "Print"], |

3498 | Cell[9837, 209, 1558, 23, 24, "Print"], |

3499 | Cell[11398, 234, 1690, 27, 24, "Print"], |

3500 | Cell[13091, 263, 1589, 24, 24, "Print"], |

3501 | Cell[14683, 289, 1540, 23, 24, "Print"], |

3502 | Cell[16226, 314, 1572, 24, 24, "Print"], |

3503 | Cell[17801, 340, 1578, 24, 24, "Print"], |

3504 | Cell[19382, 366, 1573, 24, 24, "Print"], |

3505 | Cell[20958, 392, 1733, 28, 45, "Print"] |

3506 | }, Open ]] |

3507 | }, Open ]] |

3508 | }, Open ]], |

3509 | Cell[CellGroupData[{ |

3510 | Cell[22752, 427, 259, 3, 67, "Section"], |

3511 | Cell[CellGroupData[{ |

3512 | Cell[23036, 434, 154, 2, 28, "Subsubsection"], |

3513 | Cell[CellGroupData[{ |

3514 | Cell[23215, 440, 242, 3, 31, "Input"], |

3515 | Cell[23460, 445, 15133, 471, 279, "Output"] |

3516 | }, Open ]] |

3517 | }, Open ]], |

3518 | Cell[CellGroupData[{ |

3519 | Cell[38642, 922, 154, 2, 28, "Subsubsection"], |

3520 | Cell[CellGroupData[{ |

3521 | Cell[38821, 928, 239, 3, 31, "Input"], |

3522 | Cell[39063, 933, 14090, 451, 351, "Output"] |

3523 | }, Open ]] |

3524 | }, Open ]], |

3525 | Cell[CellGroupData[{ |

3526 | Cell[53202, 1390, 158, 2, 28, "Subsubsection"], |

3527 | Cell[CellGroupData[{ |

3528 | Cell[53385, 1396, 292, 4, 31, "Input"], |

3529 | Cell[53680, 1402, 51950, 1570, 1058, "Output"] |

3530 | }, Open ]] |

3531 | }, Closed]], |

3532 | Cell[CellGroupData[{ |

3533 | Cell[105679, 2978, 155, 2, 22, "Subsubsection"], |

3534 | Cell[CellGroupData[{ |

3535 | Cell[105859, 2984, 246, 3, 31, "Input"], |

3536 | Cell[106108, 2989, 5267, 175, 291, "Output"] |

3537 | }, Open ]] |

3538 | }, Closed]] |

3539 | }, Open ]], |

3540 | Cell[CellGroupData[{ |

3541 | Cell[111436, 3171, 312, 4, 67, "Section"], |

3542 | Cell[CellGroupData[{ |

3543 | Cell[111773, 3179, 879, 13, 31, "Input"], |

3544 | Cell[CellGroupData[{ |

3545 | Cell[112677, 3196, 534, 11, 24, "Print"], |

3546 | Cell[113214, 3209, 521, 11, 24, "Print"], |

3547 | Cell[113738, 3222, 546, 11, 24, "Print"], |

3548 | Cell[114287, 3235, 712, 15, 24, "Print"], |

3549 | Cell[115002, 3252, 513, 10, 24, "Print"], |

3550 | Cell[115518, 3264, 532, 12, 26, "Print"], |

3551 | Cell[116053, 3278, 630, 14, 24, "Print"], |

3552 | Cell[116686, 3294, 528, 11, 24, "Print"], |

3553 | Cell[117217, 3307, 508, 10, 24, "Print"], |

3554 | Cell[117728, 3319, 533, 11, 24, "Print"], |

3555 | Cell[118264, 3332, 894, 18, 24, "Print"], |

3556 | Cell[119161, 3352, 504, 10, 24, "Print"], |

3557 | Cell[119668, 3364, 489, 10, 24, "Print"] |

3558 | }, Open ]] |

3559 | }, Open ]] |

3560 | }, Open ]], |

3561 | Cell[CellGroupData[{ |

3562 | Cell[120218, 3381, 244, 3, 67, "Section"], |

3563 | Cell[CellGroupData[{ |

3564 | Cell[120487, 3388, 154, 2, 28, "Subsubsection"], |

3565 | Cell[120644, 3392, 210, 4, 31, "Input"] |

3566 | }, Open ]], |

3567 | Cell[CellGroupData[{ |

3568 | Cell[120891, 3401, 154, 2, 28, "Subsubsection"], |

3569 | Cell[121048, 3405, 134, 2, 31, "Input"] |

3570 | }, Open ]], |

3571 | Cell[CellGroupData[{ |

3572 | Cell[121219, 3412, 158, 2, 28, "Subsubsection"], |

3573 | Cell[121380, 3416, 263, 4, 31, "Input"] |

3574 | }, Open ]], |

3575 | Cell[CellGroupData[{ |

3576 | Cell[121680, 3425, 155, 2, 28, "Subsubsection"], |

3577 | Cell[121838, 3429, 134, 2, 31, "Input"] |

3578 | }, Open ]], |

3579 | Cell[CellGroupData[{ |

3580 | Cell[122009, 3436, 216, 3, 28, "Subsubsection"], |

3581 | Cell[122228, 3441, 360, 6, 31, "Input"] |

3582 | }, Open ]] |

3583 | }, Open ]] |

3584 | }, Open ]] |

3585 | } |

3586 | ] |

3587 | *) |

3588 | |

3589 | (* End of internal cache information *) |