Monotops: monotops.fr

File monotops.fr, 9.5 KB (added by BenjF, 9 years ago)

FeynRules monotop model file

Line 
1(* ********************************************************* *)
2(* *****                                               ***** *)
3(* *****  FeynRules model file: SM + monotops          ***** *)
4(* *****  Author: B. Fuks                              ***** *)
5(* *****                                               ***** *)
6(* ********************************************************* *)
7
8(* ************************** *)
9(* *****  Information   ***** *)
10(* ************************** *)
11M$ModelName = "MonoTops";
12M$Information = { Authors->{"Benjamin Fuks"}, Emails->{"fuks@cern.ch"}, Institutions->{"IPHC Strasbourg / University of Strasbourg"},
13                  Date->"05.07.11", Version->"1.0.0",
14                  References->{"J. Andrea, B. Fuks, F. Maltoni, arXiv:1106.6199 [hep-ph]"},
15                  URLs->{"http://feynrules.phys.ucl.ac.be/view/Main/Monotops"} };
16FeynmanGauge = True;
17$Flag4F = 1;
18
19
20(* ************************** *)
21(* *****     Fields     ***** *)
22(* ************************** *)
23M$ClassesDescription = {
24(* Additional fermion for monotops *)
25  F[5] == { ClassName->FMET, SelfConjugate->True, Mass->{MFM,50}, Width->{WFM,10},
26            ParticleName->"fmet",
27            PDG->9000003,PropagatorLabel->"FMET", PropagatorType->Straight, PropagatorArrow->None},
28 
29(* Additional gauge boson for monotops *)
30  V[7] == { ClassName->VMET, SelfConjugate->True,  Mass->{MVM,50.}, Width->{WVM,10.}, ParticleName->"vmet",
31            PDG->9000002, PropagatorLabel->"VMET", PropagatorType->Sine, PropagatorArrow->None},
32  V[8] == { ClassName->VC, SelfConjugate->False, Indices->{Index[Colour]}, Mass->{MVC,500}, Width->{WVC,10}, QuantumNumbers->{Q->2/3},
33            ParticleName->"vc", AntiParticleName->"vc~",
34            PDG->9000005, PropagatorLabel->"VC", PropagatorType->Sine, PropagatorArrow->Forward},
35
36(* Additional scalars for monotops *)
37  S[4] == { ClassName->SMET, SelfConjugate->True, Mass->{MSM, 50}, Width->{WSM,10.},
38            ParticleName->"smet",
39            PDG->9000001, PropagatorLabel->"SMET", PropagatorType->ScalarDash, PropagatorArrow->None },
40  S[5] == { ClassName->phiC, SelfConjugate->False, Mass->{MSC, 1000}, Width->{WSC,10.}, Indices->{Colour}, QuantumNumbers->{Q->2/3},
41            ParticleName->"phic", AntiParticleName->"phic~",
42            PDG->9000004, PropagatorLabel->"phiC", PropagatorType->ScalarDash, PropagatorArrow->Forward},
43  S[6] == { ClassName->tphiC, SelfConjugate->False, Mass->{tMSC, 1000}, Width->{tWSC,10.}, Indices->{Colour}, QuantumNumbers->{Q->-1/3},
44            ParticleName->"tphic", AntiParticleName->"tphic~",
45            PDG->9000006, PropagatorLabel->"tphiC", PropagatorType->ScalarDash, PropagatorArrow->Forward}
46};
47
48(* ************************** *)
49(* *****   Parameters   ***** *)
50(* ************************** *)
51M$Parameters = {
52(* Monotop couplings: extermal parameters *)
53  A0FC == { TeX->Subsuperscript[A,FC,0], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->A0FC,
54            Value-> {
55              A0FC[1,1]->0.,  A0FC[1,2]->0., A0FC[1,3]->0.1,
56              A0FC[2,1]->0.,  A0FC[2,2]->0., A0FC[2,3]->0.,
57              A0FC[3,1]->0.1, A0FC[3,2]->0., A0FC[3,3]->0. },
58            InteractionOrder->{MT1,1}, Description->"FCNC scalar quark-quark couplings"},
59  B0FC == { TeX->Subsuperscript[B,FC,0], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->B0FC,
60            Value-> {B0FC[_,_]->0}, InteractionOrder->{MT1,1},
61            Description->"FCNC pseudoscalar quark-quark couplings"},
62  A1FC == { TeX->Subsuperscript[A,FC,1], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->A1FC,
63            Value-> {
64              A1FC[1,1]->0.,  A1FC[1,2]->0., A1FC[1,3]->0.1,
65              A1FC[2,1]->0.,  A1FC[2,2]->0., A1FC[2,3]->0.,
66              A1FC[3,1]->0.1, A1FC[3,2]->0., A1FC[3,3]->0. },
67            InteractionOrder->{MT2,1}, Description->"FCNC vector quark-quark couplings"},
68  B1FC == { TeX->Subsuperscript[B,FC,1], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->B1FC,
69            Value-> {B1FC[_,_]->0}, InteractionOrder->{MT2,1},
70            Description->"FCNC pseudovector quark-quark couplings"},
71  A12S == { TeX->Subsuperscript[A,S,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->A12S,
72            Value-> {A12S[1]->0., A12S[2]->0.,  A12S[3]->0.1 } ,
73            InteractionOrder->{MT3,1}, Description->"Colored scalar resonance couplings to quark-FMET"},
74  B12S == { TeX->Subsuperscript[B,S,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->B12S,
75            Value-> {B12S[_]->0}, InteractionOrder->{MT3,1},
76            Description->"Colored scalar resonance couplings to quark-FMET"},
77  tA12S == { TeX->Subsuperscript[tA,S,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->tA12S,
78            Value-> {tA12S[1]->0.1, tA12S[2]->0.1,  tA12S[3]->0. } ,
79            InteractionOrder->{MT3,1}, Description->"t-channel and u-channel contributions to a 4F interaction"},
80  tB12S == { TeX->Subsuperscript[tB,S,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->tB12S,
81            Value-> {tB12S[_]->0}, InteractionOrder->{MT3,1}, Description->"t-channel and u-channel contributions to a 4F interaction"},
82  AQS == { TeX->Subsuperscript[A,RS,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->AQS,
83            Value-> {
84              AQS[1,1]->0.,   AQS[1,2]->0.1, AQS[1,3]->0.,
85              AQS[2,1]->-0.1, AQS[2,2]->0.,  AQS[2,3]->0.,
86              AQS[3,1]->0.,   AQS[3,2]->0.,  AQS[3,3]->0. },
87            InteractionOrder->{MT3,1}, Description->"t-channel and u-channel contributions to a 4F interaction"},
88  BQS == { TeX->Subsuperscript[B,RS,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->BQS,
89            Value-> {BQS[_,_]->0}, InteractionOrder->{MT3,1},
90            Description->"Colored scalar resonance couplings to quarks"},
91  tAQS == { TeX->Subsuperscript[tA,RS,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->tAQS,
92            Value-> {
93              tAQS[1,1]->0., tAQS[1,2]->0., tAQS[1,3]->0.1,
94              tAQS[2,1]->0., tAQS[2,2]->0., tAQS[2,3]->0.1,
95              tAQS[3,1]->0., tAQS[3,2]->0., tAQS[3,3]->0. },
96            InteractionOrder->{MT3,1}, Description->"t-channel and u-channel contributions to a 4F interaction"},
97  tBQS == { TeX->Subsuperscript[tB,RS,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->tBQS,
98            Value-> {tBQS[_,_]->0}, InteractionOrder->{MT3,1},
99            Description->"Colored scalar resonance couplings to quarks"},
100  A12V == { TeX->Subsuperscript[A,V,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->A12V,
101            Value->{A12V[1]->0., A12V[2]->0.,  A12V[3]->0.1 } ,
102            InteractionOrder->{MT4,1}, Description->"Colored vector resonance couplings to quark-FMET"},
103  B12V == { TeX->Subsuperscript[B,V,12], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation]}, BlockName->B12V,
104            Value-> {B12V[_]->0}, InteractionOrder->{MT4,1},
105            Description->"Colored vector resonance couplings to quark-FMET"},
106  AQV == { TeX->Subsuperscript[A,RV,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->AQV,
107            Value-> {
108              AQV[1,1]->0.1,  AQV[1,2]->0., AQV[1,3]->0.,
109              AQV[2,1]->0., AQV[2,2]->0.,  AQV[2,3]->0.,
110              AQV[3,1]->0.,  AQV[3,2]->0.,  AQV[3,3]->0. },
111            InteractionOrder->{MT4,1}, Description->"Colored vector resonance couplings to quarks"},
112  BQV == { TeX->Subsuperscript[B,RV,Q], ParameterType->External, ComplexParameter->False, Indices->{Index[Generation],Index[Generation]}, BlockName->BQV,
113            Value-> {BQV[_,_]->0}, InteractionOrder->{MT4,1},
114            Description->"Colored vector resonance couplings to quarks"}
115};
116
117
118(* Monotop Lagrangian pieces *)
119LMono := Module[{L0,L1,L120,L121,L120p,sp,sp1,sp2,f1,f2,c1,c2,c3},
120    L0  := SMET (uqbar[sp1,f1,c1].uq[sp1,f2,c1] A0FC[f1,f2] + uqbar[sp1,f1,c1].Ga[5,sp1,sp2].uq[sp2,f2,c1] B0FC[f1,f2]);
121    L1  := VMET[mu] (uqbar[sp1,f1,c1].Ga[mu,sp1,sp2].uq[sp2,f2,c1] A1FC[f1,f2] + uqbar[sp1,f1,c1].Ga[mu,sp1,sp2].Ga[5,sp2,sp].uq[sp,f2,c1] B1FC[f1,f2]);
122    L120:= phiC[c3] Eps[c1,c2,c3] (CC[dqbar][sp1,f1,c1].dq[sp1,f2,c2] AQS[f1,f2] + CC[dqbar][sp1,f1,c1].Ga[5,sp1,sp2].dq[sp2,f2,c2] BQS[f1,f2]) +
123           phiC[c1] (uqbar[sp1,f1,c1].FMET[sp1] A12S[f1] + uqbar[sp1,f1,c1].Ga[5,sp1,sp2].FMET[sp2] B12S[f1]);
124    L120p:=tphiC[c3] Eps[c1,c2,c3] (CC[dqbar][sp1,f1,c1].uq[sp1,f2,c2] tAQS[f1,f2] + CC[dqbar][sp1,f1,c1].Ga[5,sp1,sp2].uq[sp2,f2,c2] tBQS[f1,f2]) +
125           tphiC[c1] (dqbar[sp1,f1,c1].FMET[sp1] tA12S[f1] + dqbar[sp1,f1,c1].Ga[5,sp1,sp2].FMET[sp2] tB12S[f1]);
126    L121:= VC[mu,c3] Eps[c1,c2,c3] (CC[dqbar][sp1,f1,c1].Ga[mu,sp1,sp2].dq[sp2,f2,c2] AQV[f1,f2] +
127              CC[dqbar][sp1,f1,c1].Ga[mu,sp1,sp2].Ga[5,sp2,sp].dq[sp,f2,c2] BQV[f1,f2]) +
128           VC[mu,c1] (uqbar[sp1,f1,c1].Ga[mu,sp1,sp2].FMET[sp2] A12V[f1] + uqbar[sp1,f1,c1].Ga[mu,sp1,sp2].Ga[5,sp2,sp].FMET[sp] B12V[f1]);
129  L0+L1+L120+L121+$Flag4F*L120p + HC[L0+L1+L120+L121+$Flag4F*L120p]];