
(* description = "pp -> t+jets|pp -> t+jets|pp -> tj|Single top plus jet production at NLO EW." *)

SelectInterference = {gQCD -> 0};
UnitaryGauge = False;

(* utxdxb *) AddProcess[FeynArtsProcess -> {-F[4,{1}],  F[3,{1}]} -> {F[3,{3}], -F[4,{3}]}];
(* uxtdbx *) AddProcess[FeynArtsProcess -> { F[4,{1}], -F[3,{1}]} -> {F[4,{3}], -F[3,{3}]}];

(* utxdxba *) AddReal[FeynArtsProcess -> {-F[4,{1}],  F[3,{1}]} -> {F[3,{3}], -F[4,{3}], V[1]}];
(* uxtdbxa *) AddReal[FeynArtsProcess -> { F[4,{1}], -F[3,{1}]} -> {F[4,{3}], -F[3,{3}], V[1]}];
