aboutsummaryrefslogtreecommitdiff
path: root/m/WaveToy.m
diff options
context:
space:
mode:
authorErik Schnetter <schnetter@cct.lsu.edu>2007-12-27 17:54:49 +0100
committerErik Schnetter <schnetter@cct.lsu.edu>2007-12-27 17:54:49 +0100
commita66116f18b5ae7e373b9e00cdd2acff8a8e6afbf (patch)
treed5bad2aec72a8ef18cba01fb26269a067407af3d /m/WaveToy.m
parent95c73d61458dc832692f575d8967a0f9884068c2 (diff)
Regenerate WaveToy thorns
Correct thorn name: Use ML_FOWaveToy instead of ML_FOWavetoy (upper case T). Regenerate thorns after correcting error in Kranc.
Diffstat (limited to 'm/WaveToy.m')
-rw-r--r--m/WaveToy.m22
1 files changed, 21 insertions, 1 deletions
diff --git a/m/WaveToy.m b/m/WaveToy.m
index 3136b32..20936ce 100644
--- a/m/WaveToy.m
+++ b/m/WaveToy.m
@@ -17,7 +17,22 @@ derivatives =
PDstandardNth[i_] -> StandardCenteredDifferenceOperator[1,derivOrder/2,i],
PDstandardNth[i_, i_] -> StandardCenteredDifferenceOperator[2,derivOrder/2,i],
PDstandardNth[i_, j_] -> StandardCenteredDifferenceOperator[1,derivOrder/2,i]
- StandardCenteredDifferenceOperator[1,derivOrder/2,j]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,j],
+ PDstandardNth[i_, i_, i_] ->
+ StandardCenteredDifferenceOperator[3,derivOrder/2,i],
+ PDstandardNth[i_, i_, j_] ->
+ StandardCenteredDifferenceOperator[2,derivOrder/2,i]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,j],
+ PDstandardNth[i_, j_, i_] ->
+ StandardCenteredDifferenceOperator[2,derivOrder/2,i]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,j],
+ PDstandardNth[j_, i_, i_] ->
+ StandardCenteredDifferenceOperator[2,derivOrder/2,i]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,j],
+ PDstandardNth[i_, j_, k_] ->
+ StandardCenteredDifferenceOperator[1,derivOrder/2,i]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,j]
+ StandardCenteredDifferenceOperator[1,derivOrder/2,k]
};
(* local derivatives *)
@@ -31,6 +46,9 @@ PDglob[var_,lx_,ly_] :=
UseGlobalDerivs = True;
PD := If [UseGlobalDerivs, PDglob, PDloc];
+(* timelevels *)
+evolutionTimelevels = 2;
+
KD = KroneckerDelta;
(******************************************************************************)
@@ -229,6 +247,7 @@ CreateKrancThornTT [groups, ".", "ML_WaveToy",
Calculations -> calculations,
DeclaredGroups -> declaredGroupNames,
PartialDerivatives -> derivatives,
+ EvolutionTimelevels -> evolutionTimelevels,
InheritedImplementations -> inheritedImplementations
];
@@ -245,5 +264,6 @@ CreateKrancThornTT [groupsFO, ".", "ML_FOWaveToy",
Calculations -> calculationsFO,
DeclaredGroups -> declaredGroupNamesFO,
PartialDerivatives -> derivatives,
+ EvolutionTimelevels -> evolutionTimelevels,
InheritedImplementations -> inheritedImplementations
];