Wolfram Language Paclet Repository
Community-contributed installable additions to the Wolfram Language
GSberveglieri`Phi4tools`
CountLoops  |
|
| | ||||
Details and Options
Examples
(1)
Basic Examples
(1)
In[1]:=
Needs["GSberveglieri`Phi4tools`"]
The diagrams with 5 quartic vertices and two external legs have 5 loops
In[2]:=
 | CountLoops |
 | IntegrandDiagram |
Out[2]=
{5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5}
After the substitutions, the number of residual loops is greatly reduced
In[3]:=
| CountLoops |
| IntegrandDiagram |
Out[3]=
{0,0,2,1,2,1,2,1,2,2,2,2,1,1,2,2,2,2,3}
In[4]:=
integ=
[4,0,5,10,"Substitutions""Analytics"]
[integ],
[integ]
| IntegrandDiagram |
 | CountLoops |
| CountLoops |
 | WriteExplicit |
Out[4]=
2ℬ[[2]][[2]][-[1]-[2],[1],[2]]
2
[[1]+[2]]
Out[4]=
{2,2}
 |
|
 |
|
 |
|
""