FeynCalc / feyncalc

Mathematica package for algebraic calculations in elementary particle physics.
https://feyncalc.github.io
GNU General Public License v3.0
310 stars 87 forks source link

FCLoopBasisIntegralToGraph: Graph representation from a propagator representation #73

Closed vsht closed 3 years ago

vsht commented 3 years ago

Initial version of FCLoopBasisIntegralToGraph, a function that converts a propagator representation of a loop integral to a graph representation. The output is a list of edge rules that can immediately processed via Mathematica's GraphPlot

Usage examples:

FAD[p1, p2, q1 + p1, p1 - q2, q1 + p1 - p2, p1 - p2 - q2, 
 p1 - p2 + q1 - q3]
re = FCLoopBasisIntegralToGraph[%, {p1, p2}]
GraphPlot[%]
FAD[p1] FAD[p4] FAD[p1 + q1] FAD[p3 + p4 + q1] FAD[p3] FAD[p1 - p4]
FCLoopBasisIntegralToGraph[%, {p1, p3, p4}, FCVerbose -> 0]
GraphPlot[%]
SFAD[p1, p2, q1 + p1, p1 - q2, q1 + p1 - p2, p1 - p2 - q2]
FCLoopBasisIntegralToGraph[%, {p1, p2}]
GraphPlot[%]

ToDo