SchoolKias/FeynRules: addon.fr

File addon.fr, 1.1 KB (added by BenjF, 8 years ago)

Additional fields necessary before implementing superfields

Line 
1(* To be added to susyqcd.fr *)
2
3IndexRange[Index[Colourb]]= NoUnfold[Range[3]]; IndexStyle[Colourb,m];
4
5(* ************************** *)
6(* *****  Gauge groups  ***** *)
7(* ************************** *)
8M$GaugeGroups = {
9  SU3C == {
10    Abelian           -> False,
11    GaugeBoson        -> G,
12    CouplingConstant  -> gs,
13    StructureConstant -> f,
14    Representations   -> {{T,Colour}, {Tb,Colourb}}
15  }
16};
17
18(* ************************** *)
19(* *****     Fields     ***** *)
20(* ************************** *)
21M$ClassesDescription = {
22  W[5000]== {
23    ClassName      -> UQRw,
24    Unphysical     -> True,
25    Chirality      -> Left,
26    SelfConjugate  -> False,
27    Indices        -> {Index[Gen],Index[Colourb]},
28    FlavorIndex    -> Gen,
29    QuantumNumbers -> {Q->-2/3}
30  },
31
32  S[5000] == {
33    ClassName        -> SQR,
34    Unphysical       -> True,
35    SelfConjugate    -> False,
36    Indices          -> {Index[Gen],Index[Colourb]},
37    FlavorIndex      -> Gen,
38    QuantumNumbers   -> {Q -> -2/3},
39    Definitions      -> { SQR[ff_,cc_] :> Module[{ff2},
40      RuR[ff2,ff] subar[ff2,cc]] }
41  }
42};