
(* description = "pp -> V+jets|pp -> V+jets|pp -> nnjj|Production of an off-shell Z-boson with neutrino decays and two jets at NLO EW (including all subleading one-loop orders)." *)

SetParameters = JoinOptions[{ME -> 0}];

(* pp -> n n~ jj *)

(* O(as^2 a^2) + O(as^2 a^3) *)

(* nenexddxgg *)  AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuuxgg *)  AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexbbxgg *)  AddProcess[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 + 2 * #2 &)];

(* nenexdddxdx *) AddProcess[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuuxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexddxssx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexccxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuxcdsx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuuuxux *) AddProcess[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuuxccx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexddxbbx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexuuxbbx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];
(* nenexbbbxbx *) AddProcess[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 4 - 2 * #2 || Exponent[#1, eQED] == 2 + 2 * #2 &)];

(* nenexddxagg *)  AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexuuxagg *)  AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexbbxagg *)  AddReal[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[5],V[5],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];

(* nenexdddxdxa *) AddReal[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexuuxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexddxssxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexccxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexuuuxuxa *) AddReal[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexuuxccxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexddxbbxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexuuxbbxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];
(* nenexbbbxbxa *) AddReal[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 3 &)];

(* nenexdddxdxg *) AddReal[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexuuxddxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexddxssxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexccxddxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexuxcdsxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexuuuxuxg *) AddReal[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexuuxccxg *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexddxbbxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexuuxbbxg *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];
(* nenexbbbxbxg *) AddReal[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}],V[5]}, SelectInterference -> {gQCD -> 4}, SelectCoupling -> (Exponent[#1, eQED] == 2 || Exponent[#1, eQED] == 4 &)];

(* O(as*a^3) + O(as^2 a^3) *)

(* nenexddxag *)  AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, gQCD] == 1 + 2 * #2 &)];
(* nenexuuxag *)  AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, gQCD] == 1 + 2 * #2 &)];
(* nenexbbxag *)  AddProcess[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, gQCD] == 1 + 2 * #2 &)];

(* O(as*a^3) *)

(* nenexdddxdx *) AddTree[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexuuxddx *) AddTree[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexddxssx *) AddTree[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexccxddx *) AddTree[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexuxcdsx *) AddTree[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexuuuxux *) AddTree[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexuuxccx *) AddTree[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexddxbbx *) AddTree[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexuuxbbx *) AddTree[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];
(* nenexbbbxbx *) AddTree[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}]}, SelectInterference -> {eQED -> 6}, SelectCoupling -> (Exponent[#1, eQED] == 2  || Exponent[#1, eQED] == 4 &)];


(* O(a^4) + O(as a^4) *)

(* nenexdddxdx *) AddProcess[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuuxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexddxssx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexccxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuxcdsx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuuuxux *) AddProcess[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuuxccx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexddxbbx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuuxbbx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexbbbxbx *) AddProcess[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 2 - 2 * #2 || Exponent[#1, gQCD] == 0 + 2 * #2 &)];

(* nenexdddxdxa *) AddReal[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexuuxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexddxssxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexccxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexuxcdsxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexuuuxuxa *) AddReal[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexuuxccxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexddxbbxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexuuxbbxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];
(* nenexbbbxbxa *) AddReal[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}],V[1]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 || Exponent[#1, gQCD] == 2 &)];

(* nenexdddxdxg *) AddReal[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexuuxddxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexddxssxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexccxddxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexuxcdsxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexuuuxuxg *) AddReal[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexuuxccxg *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexddxbbxg *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexuuxbbxg *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];
(* nenexbbbxbxg *) AddReal[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}],V[5]}, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 1 &)];

(* O(as a^3) + O(as a^4) *)

(* nenexddxag *)  AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 3 + 2 * #2 &)];
(* nenexuuxag *)  AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 3 + 2 * #2 &)];
(* nenexbbxag *)  AddProcess[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 3 + 2 * #2 &)];

(* nenexddxaag *)  AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[5]}, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 4 &)];
(* nenexuuxaag *)  AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[5]}, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 4 &)];
(* nenexbbxaag *)  AddReal[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[5]}, SelectInterference -> {gQCD -> 2}, SelectCoupling -> (Exponent[#1, eQED] == 4 &)];


(* O(a^4) + O(as a^4) *)

(* nenexddxaa *)  AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexuuxaa *)  AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 + 2 * #2 &)];
(* nenexbbxaa *)  AddProcess[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {eQED -> 8}, SelectCoupling -> (Exponent[#1, gQCD] == 0 + 2 * #2 &)];


(* O(a^4) + O(a^5) *)

(* nenexdddxdx *) AddProcess[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuuxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexddxssx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexccxddx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuxcdsx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuuuxux *) AddProcess[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuuxccx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexddxbbx *) AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuuxbbx *) AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexbbbxbx *) AddProcess[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];

(* nenexdddxdxa *) AddReal[FeynArtsProcess -> {F[4,{1}], F[4,{1}]}  -> {F[1,{1}], -F[1,{1}], F[4,{1}],F[4,{1}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuuxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{1}],-F[3,{1}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexddxssxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[4,{2}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexccxddxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuxcdsxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{2}],-F[3,{2}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuuuxuxa *) AddReal[FeynArtsProcess -> {F[3,{1}], F[3,{1}]}  -> {F[1,{1}], -F[1,{1}], F[3,{1}],F[3,{1}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuuxccxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[3,{2}],-F[3,{2}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexddxbbxa *) AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuuxbbxa *) AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], F[4,{3}],-F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexbbbxbxa *) AddReal[FeynArtsProcess -> {F[4,{3}], F[4,{3}]}  -> {F[1,{1}], -F[1,{1}], F[4,{3}],F[4,{3}],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];

(* nenexddxaa *)  AddProcess[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexuuxaa *)  AddProcess[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];
(* nenexbbxaa *)  AddProcess[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 4 + 2 * #2 &)];


(* nenexddxaaa *)  AddReal[FeynArtsProcess -> {F[4,{1}], -F[4,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexuuxaaa *)  AddReal[FeynArtsProcess -> {F[3,{1}], -F[3,{1}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];
(* nenexbbxaaa *)  AddReal[FeynArtsProcess -> {F[4,{3}], -F[4,{3}]} -> {F[1,{1}], -F[1,{1}], V[1],V[1],V[1]}, SelectInterference -> {gQCD -> 0}, SelectCoupling -> (Exponent[#1, eQED] == 5 &)];










