
(* description = "pp -> tV+jets|pp -> tW+jets|pp -> tW|Single top plus on-shell W+/W- production at NLO EW. No real corrections included." *)

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

(* txbwxg *) AddProcess[FeynArtsProcess -> { F[4,{3}], V[5]} -> { V[3],  F[3,{3}]}];
(* tbxwg  *) AddProcess[FeynArtsProcess -> {-F[4,{3}], V[5]} -> {-V[3], -F[3,{3}]}];

(* real corrections: overlap with tt~ *)
