aboutsummaryrefslogtreecommitdiff
path: root/Tools/CodeGen/KrancThorn.m
diff options
context:
space:
mode:
authorIan Hinder <ian.hinder@aei.mpg.de>2010-03-17 22:14:02 -0400
committerIan Hinder <ian.hinder@aei.mpg.de>2010-03-17 22:14:02 -0400
commit7ce764ef95e7c82108f2605e072c4c4d9372a7ea (patch)
treeb11b1385258dee2386b6fa1136fb2bd4695cf5f7 /Tools/CodeGen/KrancThorn.m
parent4cbd4ae748a08aecec5d3b41d7a3890480a4ffe4 (diff)
Remove internal support for more than one loop in a calculation
Having more than one loop in a calculation is never used and it complicates the code.
Diffstat (limited to 'Tools/CodeGen/KrancThorn.m')
-rw-r--r--Tools/CodeGen/KrancThorn.m2
1 files changed, 1 insertions, 1 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m
index fdfcd8d..bb53b7b 100644
--- a/Tools/CodeGen/KrancThorn.m
+++ b/Tools/CodeGen/KrancThorn.m
@@ -756,7 +756,7 @@ Options[CreateSetterSourceWrapper] = ThornOptions;
CreateSetterSourceWrapper[calc_, parameters_, derivs_, useCSE_, opts:OptionsPattern[]] :=
Module[{modCalc},
- modCalc = Join[calc /. ((Equations -> {es___}) -> (Equations -> {{es}})),
+ modCalc = Join[calc,
{Parameters -> parameters},
{PartialDerivatives -> derivs}];