diff options
| author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-11-14 19:45:34 +0100 |
|---|---|---|
| committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-11-14 19:45:34 +0100 |
| commit | 72b0c57fbcbbc71f55464dfdf751dbdb0b45fcb8 (patch) | |
| tree | fc172386f7212ae4af058bc6c9d1bef970ae7e67 | |
| parent | 052fa4698fb7d9d05addb0fa36909edc0f645291 (diff) | |
KrancThorn.m: Ensure that conservation calculations have required entries
| -rw-r--r-- | Tools/CodeGen/KrancThorn.m | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index 85ebd4c..ee656e1 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -189,9 +189,14 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts:OptionsPattern[ (* Add in calculations to solve any conservation laws that have been provided *) - calcs = Join[calcs, - consCalcs = Flatten[Map[ProcessConservationCalculation[#,thornName] &, - consCalcsIn],1]]; + + consCalcs = Flatten[Map[ProcessConservationCalculation[#,thornName] &, + consCalcsIn],1]; + + consCalcs = Map[Join[#, {PartialDerivatives -> partialDerivs, + Implementation -> implementation}] &, consCalcs]; + + calcs = Join[calcs,consCalcs]; (* Print["consCalcs = ", consCalcs]; *) consGroups = Union@Flatten[ |