diff options
-rw-r--r-- | Tools/CodeGen/KrancThorn.m | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index 7ab3341..284fab9 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -234,20 +234,16 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ (* Add the groups into the calcs *) calcs = Map[Join[#, {Groups -> groups}] &, calcs]; - (* ------------------------------------------------------------------------ - Split calculations - ------------------------------------------------------------------------ *) + rhsGroups = Map[groupName, rhsGroupDefinitions]; + rhsODEGroups = Map[groupName, rhsODEGroupDefinitions]; - calcs = SplitCalculations[calcs]; + declaredGroups = Join[declaredGroups, rhsGroups, odeGroups, rhsODEGroups]; (* ------------------------------------------------------------------------ - Add MoL groups to declaredGroups + Split calculations ------------------------------------------------------------------------ *) - rhsGroups = Map[groupName, rhsGroupDefinitions]; - rhsODEGroups = Map[groupName, rhsODEGroupDefinitions]; - - declaredGroups = Join[declaredGroups, rhsGroups, odeGroups, rhsODEGroups]; + calcs = SplitCalculations[calcs]; (* ------------------------------------------------------------------------ Add options to calculations |