PaVeReduce

Description

PaVeReduce[expr] reduces all Passarino-Veltman integrals (i.e. all PaVe's) in expr down to scalar A0, B0, C0 and D0.

Options[PaVeReduce]

?WriteOutPaVe

See also:  FRH, PaVeOrder.

Examples

PaVeReduce[PaVe[1, 2, {s, m^2, m^2}, {m^2, m^2, M^2}], 
      IsolateHead -> L]

L[10]

FRH[%]

PaVeReduce[
      PaVe[2, {SmallVariable[me2], mw2, t}, {SmallVariable[me2], 0, mw2}], 
      WriteOutPaVe -> "p"]

\(TableForm[
      ReadList[If[$OperatingSystem === "MacOS", ":", ""] <> "pPaVe2Csmame2mw2tCsmame20mw2.s", String]]\)

DeleteFile /@ 
      FileNames["pPaVe2Csmame2mw2tCsmame20mw2.s"];

se = SmallVariable[ME2];

d122 = 
      PaVeReduce[PaVe[1, 2, 2, {se, MW2, MW2, se, S, T}, {0, se, 0, se}], 
        Mandelstam -> {S, T, U, 2 MW2}, 
        IsolateHead -> F]

Write2["fctd122.for", d122res == d122, 
      FormatType -> FortranForm];

\(TableForm[
      ReadList[If[$OperatingSystem === "MacOS", ":", ""] <> "fctd122.for", String]]\)

DeleteFile /@ FileNames["fctd122.for"]; 
    Clear[d122, se];