B  B  I*alphaKB*dotp[pp1,pp2]*gi[mumu1,mumu2]-I*alphaR2B*dotp[pp1,pp1]*dotp[pp2,pp2]*gi[mumu1,mumu2]+I*alphaR2B*dotp[pp2,pp2]*Mom[pp1,mumu1]*Mom[pp1,mumu2]-I*alphaKB*Mom[pp1,mumu2]*Mom[pp2,mumu1]-I*alphaR2B*dotp[pp1,pp2]*Mom[pp1,mumu1]*Mom[pp2,mumu2]+I*alphaR2B*dotp[pp1,pp1]*Mom[pp2,mumu1]*Mom[pp2,mumu2]
G  G  I*alphaKG*deltaF[aa1,aa2]*dotp[pp1,pp2]*gi[mumu1,mumu2]-I*alphaR2G*deltaF[aa1,aa2]*dotp[pp1,pp1]*dotp[pp2,pp2]*gi[mumu1,mumu2]+I*alphaR2G*deltaF[aa1,aa2]*dotp[pp2,pp2]*Mom[pp1,mumu1]*Mom[pp1,mumu2]-I*alphaKG*deltaF[aa1,aa2]*Mom[pp1,mumu2]*Mom[pp2,mumu1]-I*alphaR2G*deltaF[aa1,aa2]*dotp[pp1,pp2]*Mom[pp1,mumu1]*Mom[pp2,mumu2]+I*alphaR2G*deltaF[aa1,aa2]*dotp[pp1,pp1]*Mom[pp2,mumu1]*Mom[pp2,mumu2]
Phi  Phibar  (-I)*alphaOmuH2*deltaF[ll1,ll2]-I*alphaKH*deltaF[ll1,ll2]*dotp[pp1,pp2]+I*alphaRDH*deltaF[ll1,ll2]*dotp[pp1,pp1]*dotp[pp2,pp2]
Wi  Wi  I*alphaKW*deltaF[nn1,nn2]*dotp[pp1,pp2]*gi[mumu1,mumu2]-I*alphaR2W*deltaF[nn1,nn2]*dotp[pp1,pp1]*dotp[pp2,pp2]*gi[mumu1,mumu2]+I*alphaR2W*deltaF[nn1,nn2]*dotp[pp2,pp2]*Mom[pp1,mumu1]*Mom[pp1,mumu2]-I*alphaKW*deltaF[nn1,nn2]*Mom[pp1,mumu2]*Mom[pp2,mumu1]-I*alphaR2W*deltaF[nn1,nn2]*dotp[pp1,pp2]*Mom[pp1,mumu1]*Mom[pp2,mumu2]+I*alphaR2W*deltaF[nn1,nn2]*dotp[pp1,pp1]*Mom[pp2,mumu1]*Mom[pp2,mumu2]
lLbar  lL  (I/2)*alphaKl[flfl1,flfl2]*deltaF[ll1,ll2]*gam[yy1,pp2,SEVEN,yy2]-(I/2)*alphaRlD[flfl1,flfl2]*deltaF[ll1,ll2]*dotp[pp2,pp2]*gam[yy1,pp2,SEVEN,yy2]
qLbar  qL  (I/2)*alphaKq[flfl1,flfl2]*deltaF[ll1,ll2]*deltaF[mm1,mm2]*gam[yy1,pp2,SEVEN,yy2]-(I/2)*alphaRqD[flfl1,flfl2]*deltaF[ll1,ll2]*deltaF[mm1,mm2]*dotp[pp2,pp2]*gam[yy1,pp2,SEVEN,yy2]
eRbar  eR  (I/2)*alphaKe[flfl1,flfl2]*gam[yy1,pp2,SIX,yy2]-(I/2)*alphaReD[flfl1,flfl2]*dotp[pp2,pp2]*gam[yy1,pp2,SIX,yy2]
uRbar  uR  (I/2)*alphaKu[flfl1,flfl2]*deltaF[mm1,mm2]*gam[yy1,pp2,SIX,yy2]-(I/2)*alphaRuD[flfl1,flfl2]*deltaF[mm1,mm2]*dotp[pp2,pp2]*gam[yy1,pp2,SIX,yy2]
dRbar  dR  (I/2)*alphaKd[flfl1,flfl2]*deltaF[mm1,mm2]*gam[yy1,pp2,SIX,yy2]-(I/2)*alphaRdD[flfl1,flfl2]*deltaF[mm1,mm2]*dotp[pp2,pp2]*gam[yy1,pp2,SIX,yy2]
