4topEFT: 4topEFT.fr

File 4topEFT.fr, 3.3 KB (added by Céline Degrande, 8 years ago)

FeynRules model file

Line 
1(***************************************************************************************************************)
2(****** This is the FeynRules mod-file for four top production ******)
3(****** ******)
4(****** Authors: C. Degrande ******)
5(****** ******)
6(***************************************************************************************************************)
7
8M$ModelName = "4topEFT";
9
10
11M$Information = {Authors -> {"C. Degrande"},
12 Version -> "1.0",
13 Date -> "31.01. 2017",
14 Institutions -> {"CERN"},
15 Emails -> {"celine.degrande@cern.ch"},
16 URLs -> "http://feynrules.phys.ucl.ac.be"};
17
18
19M$InteractionOrderHierarchy = {
20{NP,1}
21}
22
23M$InteractionOrderLimit = {
24{NP,2}
25}
26
27
28
29(**************** Parameters *************)
30
31M$Parameters = {
32
33(* External parameters *)
34
35
36 CRL2== {
37 ParameterType -> External,
38 BlockName -> DIM6,
39 InteractionOrder -> { NP, 2},
40 Value -> 1,
41 TeX -> Subscript[C,R]/\[CapitalLambda]^2,
42 Description -> "coefficient of OR in TeV-2"},
43
44 C1LL2== {
45 ParameterType -> External,
46 BlockName -> DIM6,
47 InteractionOrder -> { NP, 2},
48 Value -> 1,
49 TeX -> Subsuperscript[C,L,1]/\[CapitalLambda]^2,
50 Description -> "coefficient of O1L in TeV-2"},
51
52 C8LL2== {
53 ParameterType -> External,
54 BlockName -> DIM6,
55 InteractionOrder -> { NP, 2},
56 Value -> 1,
57 TeX -> Subsuperscript[C,L,8]/\[CapitalLambda]^2,
58 Description -> "coefficient of O8L in TeV-2"},
59
60 C1BL2== {
61 ParameterType -> External,
62 BlockName -> DIM6,
63 InteractionOrder -> { NP, 2},
64 Value -> 1,
65 TeX -> Subsuperscript[C,B,1]/\[CapitalLambda]^2,
66 Description -> "coefficient of O1B in TeV-2"},
67
68 C8BL2== {
69 ParameterType -> External,
70 BlockName -> DIM6,
71 InteractionOrder -> { NP, 2},
72 Value -> 1,
73 TeX -> Subsuperscript[C,B,8]/\[CapitalLambda]^2,
74 Description -> "coefficient of O8B in TeV-2"}
75
76}
77
78L4top= (C8BL2 Module[{ii,jj,kk,kk1,jj1,mu,aa,cc,sp1,sp2,sp3,sp4,cc1,cc2,cc3}, (QLbar[sp1,jj,3,cc].QL[sp2,jj,3,cc2] Ga[mu,sp1,sp2]) T[aa,cc,cc2]T[aa,cc3,cc4] uRbar[sp3,3,cc3].uR[sp4,3,cc4] Ga[mu,sp3,sp4]]+
79 C1BL2 Module[{ii,jj,kk,kk1,jj1,mu,aa,cc,sp1,sp2,sp3,sp4,cc1,cc2,cc3}, (QLbar[sp1,jj,3,cc].QL[sp2,jj,3,cc] Ga[mu,sp1,sp2]) uRbar[sp3,3,cc3].uR[sp4,3,cc3] Ga[mu,sp3,sp4]]+
80 C8LL2 Module[{ii,jj,kk,kk1,jj1,mu,aa,cc,sp1,sp2,sp3,sp4,cc1,cc2,cc3}, (QLbar[sp1,jj,3,cc].QL[sp2,jj,3,cc2] Ga[mu,sp1,sp2]) T[aa,cc,cc2]T[aa,cc3,cc4] QLbar[sp3,ii,3,cc3].QL[sp4,ii,3,cc4] Ga[mu,sp3,sp4]]+
81C1LL2 Module[{ii,jj,kk,kk1,jj1,mu,aa,cc,sp1,sp2,sp3,sp4,cc1,cc2,cc3}, (QLbar[sp1,jj,3,cc].QL[sp2,jj,3,cc] Ga[mu,sp1,sp2]) QLbar[sp3,ii,3,cc3].QL[sp4,ii,3,cc3] Ga[mu,sp3,sp4]]+
82 CRL2 Module[{ii,jj,kk,kk1,jj1,mu,aa,cc,sp1,sp2,sp3,sp4,cc1,cc2,cc3}, (uRbar[sp1,3,cc].uR[sp2,3,cc] Ga[mu,sp1,sp2]) uRbar[sp3,3,cc3].uR[sp4,3,cc3] Ga[mu,sp3,sp4]])/1000^2;