diff options
-rw-r--r-- | Tools/CodeGen/CodeGen.m | 9 | ||||
-rw-r--r-- | Tools/CodeGen/KrancThorn.m | 7 |
2 files changed, 8 insertions, 8 deletions
diff --git a/Tools/CodeGen/CodeGen.m b/Tools/CodeGen/CodeGen.m index 3166d97..31992cf 100644 --- a/Tools/CodeGen/CodeGen.m +++ b/Tools/CodeGen/CodeGen.m @@ -358,10 +358,11 @@ DefineCCTKSubroutine[name_, contents_] := DeclareFDVariables[] := CommentedBlock["Declare finite differencing variables", - Map[DeclareVariables[#, "CCTK_REAL"] &, {{"dx", "dy", "dz"}, - {"dxi", "dyi", "dzi"}, - {khalf,kthird,ktwothird,kfourthird,keightthird}, - {"hdxi", "hdyi", "hdzi"}}]]; + {Map[DeclareVariables[#, "CCTK_REAL"] &, {{"dx", "dy", "dz"}, + {"dxi", "dyi", "dzi"}, + {khalf,kthird,ktwothird,kfourthird,keightthird}, + {"hdxi", "hdyi", "hdzi"}}], + "\n"}]; InitialiseFDSpacingVariablesC[] := { diff --git a/Tools/CodeGen/KrancThorn.m b/Tools/CodeGen/KrancThorn.m index e678470..759882c 100644 --- a/Tools/CodeGen/KrancThorn.m +++ b/Tools/CodeGen/KrancThorn.m @@ -27,8 +27,7 @@ BeginPackage["sym`"]; -{Calculations, DeclaredGroups, RealParameters, IntParameters, - KeywordParameters, +{Calculations, DeclaredGroups, RealParameters, IntParameters, KeywordParameters, InheritedRealParameters,InheritedIntParameters,InheritedKeywordParameters, ExtendedRealParameters,ExtendedIntParameters,ExtendedKeywordParameters, Parameters, @@ -194,8 +193,8 @@ CreateKrancThorn[groupsOrig_, parentDirectory_, thornName_, opts___] := (* Construct the param file *) InfoMessage[Terse, "Creating param file"]; - param = createKrancParam[evolvedGroups, nonevolvedGroups, groups, - thornName, realParamDefs, intParamDefs, keywordParams, + param = createKrancParam[evolvedGroups, nonevolvedGroups, groups, thornName, + realParamDefs, intParamDefs, keywordParams, inheritedRealParams, inheritedIntParams, inheritedKeywordParams, extendedRealParams, extendedIntParams, extendedKeywordParams, evolutionTimelevels, |