(* description = "pp -> VV+jets|pp -> llll+jets|pp -> llllj|Production of four leptons (3ln,l3n) and a jet at NLO EW." *)

SelectInterference = {gQCD -> 2};

(* ZW- *)
(* neeexexuxdg    *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[2,{1}],  F[2,{1}], -F[2,{1}], -F[1,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nmeexmxuxdg    *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[2,{1}], -F[2,{1}],  F[2,{2}], -F[1,{2}], V[5]}, SetParameters -> JoinOptions[{ME -> 0, MM -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nenenexexuxdg  *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], -F[1,{1}],  F[2,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nenmnmxexuxdg  *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{2}], -F[1,{2}],  F[2,{1}], -F[1,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0, MM -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];

(* ZW+ *)
(* nmxeexmudxg    *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[4,{1}]} -> {F[2,{1}], -F[2,{1}],  F[1,{2}], -F[2,{2}], V[5]}, SetParameters -> JoinOptions[{ME -> 0, MM -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nexeeexudxg    *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[4,{1}]} -> {F[2,{1}], -F[2,{1}], -F[2,{1}],  F[1,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nenexnexeudxg  *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[4,{1}]} -> {F[1,{1}],  F[1,{1}], -F[1,{1}], -F[2,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];
(* nexnmnmxeudxg  *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[4,{1}]} -> {F[1,{2}], -F[1,{2}],  F[1,{1}], -F[2,{1}], V[5]}, SetParameters -> JoinOptions[{ME -> 0, MM -> 0}], SelectCoupling -> (Exponent[#, eQED] == 4 + 2 * #2 &), UnitaryGauge -> False];



