(SuperPlus[e]) (SuperMinus[e]) -> h γ / h Z (exercise)

Initialization

Exit[];

$Language="English";
SetDirectory[NotebookDirectory[]]
<<FeynArts`
<<FormCalc`

(SuperPlus[e]) (SuperMinus[e]) -> h γ

(SuperPlus[e]) (SuperMinus[e]) -> h Z

Check that the 1-loop level yields about 10% correction.