Skip to content

Commit

Permalink
KrancThorn.m: Edit comments
Browse files Browse the repository at this point in the history
  • Loading branch information
ianhinder committed Sep 12, 2013
1 parent 8833f0d commit 4ee05bf
Showing 1 changed file with 4 additions and 6 deletions.
10 changes: 4 additions & 6 deletions Tools/CodeGen/KrancThorn.m
Expand Up @@ -108,6 +108,10 @@ Thorn generation (main entry point for non-tensorial thorns)
partialDerivs = Join[partialDerivs, ConservationDifferencingOperators[]]];
reflectionSymmetries = OptionValue[ReflectionSymmetries];

(* ------------------------------------------------------------------------
Process calculations for CaKernel
------------------------------------------------------------------------ *)

(* Make the CaKernel option calculation-specific *)
calcs = Map[Append[#,UseCaKernel -> OptionValue[UseCaKernel]] &, calcs];

Expand All @@ -116,7 +120,6 @@ Thorn generation (main entry point for non-tensorial thorns)

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];

(* ------------------------------------------------------------------------
Expand Down Expand Up @@ -360,11 +363,6 @@ Thorn generation (main entry point for non-tensorial thorns)
If[OptionValue[UseOpenCL], diffHeader = OpenCLProcessDifferencingHeader[diffHeader]];
AppendTo[sources, {Filename -> "Differencing.h", Contents -> diffHeader}]];

(* ------------------------------------------------------------------------
Add predefinitions to calculations
------------------------------------------------------------------------ *)


(* ------------------------------------------------------------------------
Create calculation source files
------------------------------------------------------------------------ *)
Expand Down

0 comments on commit 4ee05bf

Please sign in to comment.