diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-27 15:25:31 -0600 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-27 15:25:31 -0600 |
commit | 47bcbd10d0e7a1ec30cd1c7900289bf2ae757e26 (patch) | |
tree | a454460866893c6f4c6f30d7ee543188610842f1 /Tools/CodeGen/KrancThorn.m | |
parent | 760ab235e1de8d4d1eb33fc89a2a897d2af28c9e (diff) |
Compute CaKernel stencil size from calculation
Diffstat (limited to 'Tools/CodeGen/KrancThorn.m')
-rw-r--r-- | Tools/CodeGen/KrancThorn.m | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index f930d1f..679cd26 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -197,6 +197,12 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ rhsGroups = Map[groupName, rhsGroupDefinitions]; rhsODEGroups = Map[groupName, rhsODEGroupDefinitions]; + calcs = Map[Join[#, + {ODEGroups -> Join[odeGroups, rhsODEGroups], + Parameters -> allParams, + PartialDerivatives -> partialDerivs, + Implementation -> implementation}] &, calcs]; + (* Construct the configuration file *) InfoMessage[Terse, "Creating configuration file"]; configuration = CreateConfiguration[opts]; @@ -275,12 +281,6 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ InfoMessage[Terse, "Creating calculation source files"]; - calcs = Map[Join[#, - {ODEGroups -> Join[odeGroups, rhsODEGroups], - Parameters -> allParams, - PartialDerivatives -> partialDerivs, - Implementation -> implementation}] &, calcs]; - If[!OptionValue[UseCaKernel], calcSources = Map[CreateSetterSource[{#}, False, {}, opts] &, calcs]; calcFilenames = Map[lookup[#, Name] <> ext &, calcs], |