diff options
author | hinder <hinder@4f5cb9a8-4dd8-4c2d-9bbd-173fa4467843> | 2010-09-13 11:16:27 +0000 |
---|---|---|
committer | hinder <hinder@4f5cb9a8-4dd8-4c2d-9bbd-173fa4467843> | 2010-09-13 11:16:27 +0000 |
commit | 279e8c54fa0e13c5f460739aa723bb26e1461b74 (patch) | |
tree | cfd7f1d8bcbec8da774373b0e78a752e579fd2b8 /m/WeylScal4.m | |
parent | 653514294786522d16e9a098e5a31b9d968772db (diff) |
Schedule calculation automatically including boundary conditions
Newer versions of Kranc default to scheduling calculations in
MoL_PseudoEvolution and applying the boundary conditions if no
Schedule string is supplied. Here WeylScal4 is updated to use this
feature, which removes the need for manual patching.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/WeylScal4/trunk@60 4f5cb9a8-4dd8-4c2d-9bbd-173fa4467843
Diffstat (limited to 'm/WeylScal4.m')
-rw-r--r-- | m/WeylScal4.m | 28 |
1 files changed, 2 insertions, 26 deletions
diff --git a/m/WeylScal4.m b/m/WeylScal4.m index 4c373ec..ecf62db 100644 --- a/m/WeylScal4.m +++ b/m/WeylScal4.m @@ -124,7 +124,6 @@ realParameters = {{Name -> offset, Default -> 10^(-15)},xorig,yorig,zorig}; PsisCalc[fdOrder_, PD_] := { Name -> "psis_calc_" <> fdOrder, - Schedule -> {"in WeylScal4_Calculate as calc_np"}, Where -> Interior, ConditionalOnKeyword -> {"fd_order", fdOrder}, Shorthands -> shorthands, @@ -270,28 +269,6 @@ PsisCalc[fdOrder_, PD_] := } }; -(* Dummy calculation routine to fool Kranc into thinking that the Weyl scalars - are evolved quantities. This way we get code to register boundary conditions. - Unfortunately it also registers with MoL so we have to remove that code by hand. -*) -DummyCalc := -{ - Name -> "dummycalc", - Schedule -> {"in Nowhere_Nevertoberun"}, - Equations -> - { - dot[Psi4r] -> 0, - dot[Psi4i] -> 0 (*, - dot[Psi3r] -> 0, - dot[Psi3i] -> 0, - dot[Psi2r] -> 0, - dot[Psi2i] -> 0, - dot[Psi1r] -> 0, - dot[Psi1i] -> 0, - dot[Psi0r] -> 0, - dot[Psi0i] -> 0 *) - } -} (**************************************************************************** Construct the thorn @@ -312,8 +289,7 @@ keywordParameters = calculations = { PsisCalc["2nd", PDstandard2nd], - PsisCalc["4th", PDstandard4th], - DummyCalc + PsisCalc["4th", PDstandard4th] }; CreateKrancThornTT[groups, ".", "WeylScal4", @@ -322,4 +298,4 @@ CreateKrancThornTT[groups, ".", "WeylScal4", PartialDerivatives -> derivatives, KeywordParameters -> keywordParameters, RealParameters -> realParameters, - InheritedImplementations -> {"admbase"}]; + InheritedImplementations -> {"admbase", "methodoflines"}]; |