diff options
Diffstat (limited to 'Tools/CodeGen/TensorTools.m')
-rw-r--r-- | Tools/CodeGen/TensorTools.m | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Tools/CodeGen/TensorTools.m b/Tools/CodeGen/TensorTools.m index 50d108c..5aab9ed 100644 --- a/Tools/CodeGen/TensorTools.m +++ b/Tools/CodeGen/TensorTools.m @@ -549,6 +549,9 @@ listComponentsOfDummyIndex[x_, i:(TensorIndex[_,lower])] := contractions of tensorial expressions. *) +makeSum[x : PD[Tensor[_, __TensorIndex], __TensorIndex]] := + makeSumOverDummies[x]; + makeSum[f_[x___]] := Apply[f, Map[makeSum, {x}]]; |