diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-12 15:33:21 +0200 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2013-09-12 15:33:21 +0200 |
commit | 4ee05bf4578c570efc208ffe1f12b939528a54ce (patch) | |
tree | 3445f0d7fd358217c280cb979241dd6518167c26 | |
parent | 8833f0de4517fbd839d1baae4c863cebad3e9ef3 (diff) |
KrancThorn.m: Edit comments
-rw-r--r-- | Tools/CodeGen/KrancThorn.m | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index e1434d6..cd80d30 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -108,6 +108,10 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ partialDerivs = Join[partialDerivs, ConservationDifferencingOperators[]]]; reflectionSymmetries = OptionValue[ReflectionSymmetries]; + (* ------------------------------------------------------------------------ + Process calculations for CaKernel + ------------------------------------------------------------------------ *) + (* Make the CaKernel option calculation-specific *) calcs = Map[Append[#,UseCaKernel -> OptionValue[UseCaKernel]] &, calcs]; @@ -116,7 +120,6 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ If[!And@@Map[ListQ, calcs], Print[Short[calcs//InputForm]]; ThrowError["Result of WithHostCalculations is not a list of lists"]]; - calcs = Map[Append[#, PartialDerivatives -> partialDerivs] &, calcs]; (* ------------------------------------------------------------------------ @@ -361,11 +364,6 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ AppendTo[sources, {Filename -> "Differencing.h", Contents -> diffHeader}]]; (* ------------------------------------------------------------------------ - Add predefinitions to calculations - ------------------------------------------------------------------------ *) - - - (* ------------------------------------------------------------------------ Create calculation source files ------------------------------------------------------------------------ *) |