From 60535a757d0d794eff24c9379b447d1ac4bd5216 Mon Sep 17 00:00:00 2001 From: Ian Hinder Date: Thu, 12 Sep 2013 10:27:16 +0200 Subject: KrancThorn.m: Move MoL-related code to MoL section --- Tools/CodeGen/KrancThorn.m | 14 +++++--------- 1 file 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 -- cgit v1.2.3