(* description = "pp -> V+jets|pp -> V+jets|pp -> Aj|Photon plus one jet production at NLO EW." *)


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

AddProcess[FeynArtsProcess -> {-F[3,{1}], F[3,{1}]} -> {V[1], V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}];
AddProcess[FeynArtsProcess -> {-F[4,{1}], F[4,{1}]} -> {V[1], V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}];
AddProcess[FeynArtsProcess -> {-F[4,{3}], F[4,{3}]} -> {V[1], V[5]}, UnitaryGauge -> False, SelectInterference -> {gQCD -> 2}];

(* Reals Photon *)

AddReal[FeynArtsProcess -> {-F[3,{1}], F[3,{1}]} -> {V[1], V[5], V[1]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> {-F[4,{1}], F[4,{1}]} -> {V[1], V[5], V[1]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> {-F[4,{3}], F[4,{3}]} -> {V[1], V[5], V[1]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{1}],  F[4,{1}]} -> { V[1],  F[4,{1}],  F[4,{1}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{1}], -F[4,{1}]} -> { V[1],  F[3,{1}], -F[3,{1}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{1}], -F[4,{1}]} -> { V[1],  F[4,{2}], -F[4,{2}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{1}], -F[4,{1}]} -> { V[1],  F[3,{2}], -F[3,{2}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[3,{1}],  F[3,{1}]} -> { V[1],  F[3,{1}],  F[3,{1}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[3,{1}], -F[3,{1}]} -> { V[1],  F[3,{2}], -F[3,{2}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{1}], -F[4,{1}]} -> { V[1], -F[4,{3}],  F[4,{3}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[3,{1}], -F[3,{1}]} -> { V[1], -F[4,{3}],  F[4,{3}]}, SelectInterference -> {gQCD -> 2}];
AddReal[FeynArtsProcess -> { F[4,{3}], -F[4,{3}]} -> { V[1], -F[4,{3}],  F[4,{3}]}, SelectInterference -> {gQCD -> 2}];


