aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Hinder <ian.hinder@aei.mpg.de>2013-09-12 15:33:21 +0200
committerIan Hinder <ian.hinder@aei.mpg.de>2013-09-12 15:33:21 +0200
commit4ee05bf4578c570efc208ffe1f12b939528a54ce (patch)
tree3445f0d7fd358217c280cb979241dd6518167c26
parent8833f0de4517fbd839d1baae4c863cebad3e9ef3 (diff)
KrancThorn.m: Edit comments
-rw-r--r--Tools/CodeGen/KrancThorn.m10
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
------------------------------------------------------------------------ *)