Skip to content

Commit

Permalink
Merge remote-tracking branch 'organization/feature-2.0-loopspeed' int…
Browse files Browse the repository at this point in the history
…o feature-2.0-loopspeed

Conflicts:
	meta/SelfEnergies.m
  • Loading branch information
Alexander Voigt authored and Alexander Voigt committed Mar 28, 2017
2 parents a10bc6d + 898e0a4 commit 0d7349e
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions meta/CConversion.m
Expand Up @@ -927,10 +927,10 @@
expr;

RecordSumCosts[expr_] := expr //.
SumOver[idx_, a_, b_] x_ :> SumOver[idx, a, b, IndexCost[idx, x]] x
SumOver[idx_, a_, b_] x_ :> SumOver[idx, a, b, IndexCost[idx, x]] x;

SumToSumOver[expr_] := expr //.
SARAH`sum[idx_, a_, b_, x_] :> SumOver[idx, a, b] x
SARAH`sum[idx_, a_, b_, x_] :> SumOver[idx, a, b] x;

SumOverToSum[prod : SumOver[_,_,_,_] _] := Module[{
lst = List @@ prod,
Expand All @@ -943,7 +943,7 @@
!FreeQ[#, idx]&];
SumOverToSum[SARAH`sum[idx, a, b, Eval[SumOverToSum[Times @@ summand]]]
Times @@ Complement[lst, {sumOverToConvert}, summand]]
]
];

SumOverToSum[x_Plus] := SumOverToSum /@ x;

Expand Down

0 comments on commit 0d7349e

Please sign in to comment.