Top-Philic-Zprime: Top_Philic.fr

File Top_Philic.fr, 3.3 KB (added by JeongHanKim, 4 weeks ago)
Line 
1(***************************************************************)
2(******    This is the FR file for Top-philic resonance   ******)
3(******                                                   ******)
4(******    Authors: G.Mohlabeng                           ******)
5(******                                                   ******)
6(****** Choose whether Feynman gauge is desired.          ******)
7(****** If set to False, unitary gauge is assumed.          ****)
8(****** Feynman gauge is especially useful for            ******)
9(****** CalcHEP/CompHEP where the calculation is 10-100   ******)
10(****** times faster.                                     ******)
11(****** Feynman gauge is not supported in MadGraph and Sherpa.**)
12(***************************************************************)
13
14(* ************************** *)
15(* *****  Information   ***** *)
16(* ************************** *)
17M$ModelName = "Top_Philic";
18
19M$Information = {
20  Authors      -> {"Jeong Han Kim","G. Mohlabeng"},
21  Version      -> "1.0.0",
22  Date         -> "04. 01. 2016",
23  Institutions -> {"University of Kansas"},
24  Emails       -> {"jeonghan.kim@ku.edu", "gopolang.mohlabeng@ku.edu"}
25};
26
27FeynmanGauge = False;
28
29
30(* ************************** *)
31(* *****  Change  log   ***** *)
32(* ************************** *)
33
34(* v1.0: initial version      *)
35
36
37(* ************************** *)
38(* *** Interaction orders *** *)
39(* ***  (as used by mg5)  *** *)
40(* ************************** *)
41
42M$InteractionOrderHierarchy = {
43  {Qv1, 8}
44
45};
46
47(* ************************** *)
48(* *****    Indices     ***** *)
49(* ************************** *)
50
51
52(* ************************** *)
53(* **** Particle classes **** *)
54(* ************************** *)
55M$ClassesDescription = {
56
57(* Vector Fields *)
58
59  V[7] == {
60    ClassName       -> v1,
61    SelfConjugate   -> True,
62    Mass            -> {Mv1, 1000}, 
63    Width           -> {Wv1, 1.0}, 
64    ParticleName    -> "v1",
65    PDG             -> 6000055,
66    PropagatorLabel -> "v1",
67    PropagatorType  -> Sine,
68    PropagatorArrow -> None,
69    FullName        -> "v1 vector singlet"
70  }
71};
72
73
74(* ************************** *)
75(* *****     Gauge      ***** *)
76(* *****   Parameters   ***** *)
77(* *****   (FeynArts)   ***** *)
78(* ************************** *)
79
80
81
82(* ************************** *)
83(* *****   Parameters   ***** *)
84(* ************************** *)
85M$Parameters = {
86
87
88(* Couplings with the vector color singlet *)
89
90  ct1 == {
91    ParameterType    -> External,
92    ParameterName    -> ct1,
93    BlockName        -> v0PARAMS,
94    Value            -> 1.0,
95    InteractionOrder -> {Qv1, 1}, 
96    TeX              -> Subscript[C,t1],
97    Description      -> "v1 singlet vector-Fermion coupling"
98  },
99  theta1 == {
100    ParameterType    -> External,
101    ParameterName    -> theta1,
102    BlockName        -> v1PARAMS,
103    Value            -> 1.5708,
104    InteractionOrder -> {Qv1, 1}, 
105    TeX              -> Subscript[\[Theta], 1],
106    Description      -> "Vector Singlet chirality angle"
107  }
108
109};
110
111(* ************************** *)
112(* *****   Lagrangian   ***** *)
113(* ************************** *)
114
115(*----------------------*)
116(*      Vectors         *)
117(*----------------------*)
118(* PL = ProjM, PR = ProjP  *)
119(* Color Singlet vector *)
120
121Lv1 := ct1 tbar.Ga[mu].(Cos[theta1] ProjM + Sin[theta1] ProjP).t v1[mu];
122
123
124
125
126
127
128
129
130
131