The one-loop integrals are simplified:
The loop integrals are expressed in terms of Passarino-Veltman symbols.
The divergences are singled out:
Converted by Mathematica (July 10, 2003)
![aff = SUNReduce[SUNReduce[SUNReduce[SUNReduce[amplFC /. i3 -> i1 // DoSumOver]]]] /. subpar /. udrules /. gellmannOkubo /. toEtaRules // Simplify ;](../HTMLFiles/index_40.gif){kind=small}
![af = aff /. a_FeynAmpDenominator :> (a /. PropagatorDenominator -> tmpprop) /. b_PropagatorDenominator :> PropagatorDenominatorExplicit[b] /. tmpprop -> PropagatorDenominator ;](../HTMLFiles/index_41.gif){kind=small}
![ampreduced = OneLoop[q1, #] & /@ aff ;](../HTMLFiles/index_42.gif){kind=small}
![ampinfinities = Simplify /@ VeltmanExpand[ampreduced, ExplicitLeutwylerJ0 -> True] ;](../HTMLFiles/index_43.gif){kind=small}