Overscript[J, _]'s, logs and lowest order contributions on-mass-shell (soft pion limit)

polyren = Limit[(fpionfac - 1 + fkaonfac - 1 + sqrtZPi0inv - 1 + sqrtZK0inv - 1) finpoly /. _RenormalizationState -> Sequence[], ParticleMass[Pion] -> 0] // Simplify

((2304 π^2 L _ 4^(  ) + 576 π^2 L _ 5^(  ) - 4608 π^2 L _ 6^(  ) - 1152 π^2 L _ 8^(  ) - log((m _ η^(ó    ))^2/μ^2)) (m _ K^(ó    ))^2 (2 c _ 5^(  ) (m _ K^(ó    ))^2 + c _ 2^(  ) (p _ 2^2 - (m _ K^(ó    ))^2)) (!, _ 0^(  ))^2)/(18 π^2 (f _ ϕ^(ó    ))^2)

polyren /. CouplingConstant[_[4], ___] -> 0

-(log((m _ η^(ó    ))^2/μ^2) (m _ K^(ó    ))^2 (2 c _ 5^(  ) (m _ K^(ó    ))^2 + c _ 2^(  ) (p _ 2^2 - (m _ K^(ó    ))^2)) (!, _ 0^(  ))^2)/(18 π^2 (f _ ϕ^(ó    ))^2)

Limit[finpoly, ParticleMass[Pion] -> 0] // Simplify

4 (2 c _ 5^(  ) (m _ K^(ó    ))^2 + c _ 2^(  ) (p _ 2^2 - (m _ K^(ó    ))^2)) (!, _ 0^(  ))^2

Limit[finJBarsKLM, ParticleMass[Pion] -> 0] /. fixzeros // Simplify

1/(18 (f _ ϕ^(ó    ))^2) ((6 c _ 5^(  ) (6 (3 K[p _ 2^2, (m _ π^(ó    ))^2, (m _ K^(ó    ))^2] + K[p _ 2^2, (m _ K^(ó    ))^2, (m _ η^(ó    ))^2]) (m _ K^(ó    ))^2 + Overscript[J, _] _ ((m _ K^(ó    ))^2 (m _ η^(ó    ))^2)(p _ 2^2) (3 p _ 2^2 - 2 (m _ K^(ó    ))^2) + 3 Overscript[J, _] _ ((m _ π^(ó    ))^2 (m _ K^(ó    ))^2)(p _ 2^2) (5 p _ 2^2 - 2 (m _ K^(ó    ))^2)) (m _ K^(ó    ))^2 + c _ 2^(  ) (-6 (9 K[p _ 2^2, (m _ π^(ó    ))^2, (m _ K^(ó    ))^2] + 7 K[p _ 2^2, (m _ K^(ó    ))^2, (m _ η^(ó    ))^2]) (m _ K^(ó    ))^4 + 9 Overscript[J, _] _ ((m _ π^(ó    ))^2 (m _ K^(ó    ))^2)(p _ 2^2) (-(m _ K^(ó    ))^4 - 7 p _ 2^2 (m _ K^(ó    ))^2 + 5 p _ 2^4) + Overscript[J, _] _ ((m _ K^(ó    ))^2 (m _ η^(ó    ))^2)(p _ 2^2) (11 (m _ K^(ó    ))^4 - 27 p _ 2^2 (m _ K^(ó    ))^2 + 9 p _ 2^4))) (!, _ 0^(  ))^2)

Simplify /@ Collect[Limit[finLogs + polyren /. CouplingConstant[_[4], ___] -> 0, ParticleMass[Pion] -> 0], _Log]

-(log((m _ η^(ó    ))^2/μ^2) (18 c _ 5^(  ) ((m _ K^(ó    ))^2 + p _ 2^2) (m _ K^(ó    ))^2 + c _ 2^(  ) (-13 (m _ K^(ó    ))^4 - 12 p _ 2^2 (m _ K^(ó    ))^2 + 9 p _ 2^4)) (!, _ 0^(  ))^2)/(72 π^2 (f _ ϕ^(ó    ))^2) - (log((m _ K^(ó    ))^2/μ^2) (2 c _ 5^(  ) (5 (m _ K^(ó    ))^2 + p _ 2^2) (m _ K^(ó    ))^2 + c _ 2^(  ) (-11 (m _ K^(ó    ))^4 + 6 p _ 2^2 (m _ K^(ó    ))^2 + p _ 2^4)) (!, _ 0^(  ))^2)/(16 π^2 (f _ ϕ^(ó    ))^2)


Converted by Mathematica  (July 10, 2003)