ABSTRACT
LOCAL T3 = T31 + m*T32 + m*T33 + m^2*T34; * LOCAL T41 = g_(1,pf,e,ep,kp,pi,k,e,ep); LOCAL T42 = g_(1,pf,e,ep,kp, k,e,ep); LOCAL T43 = g_(1, e,ep,kp,pi,k,e,ep); LOCAL T44 = g_(1, e,ep,kp, k,e,ep); LOCAL T4 = T41 + m*T42 + m*T43 + m^2*T44; * TRACE4,1; * ID pf = pi + k - kp; ID k.k = 0; ID kp.kp = 0; ID e.e = -1; ID ep.ep = -1; ID k.e = 0; ID kp.ep = 0; ID pi.e = 0; ID pi.ep = 0; ID k.kp = k.pi - k.pf; ID k.pf = kp.pi; ID pi.pi = m^2; * PRINT T1, T2, T3, T4;
T1 = 8*pi.k*pi.kp + 16*pi.k*k.ep^2;
T2 = 8*pi.k*pi.kp - 16*pi.kp*kp.e^2;
T3 = 16*pi.k*pi.kp*e.ep^2 - 8*pi.k*pi.kp + 8*pi.k*kp.e^2 - 8*pi.kp*k.ep^2;
T4 = 16*pi.k*pi.kp*e.ep^2 - 8*pi.k*pi.kp + 8*pi.k*kp.e^2 - 8*pi.kp*k.ep^2;
