diff options
author | Erik Schnetter <schnetter@cct.lsu.edu> | 2010-12-07 23:12:28 -0600 |
---|---|---|
committer | Erik Schnetter <schnetter@cct.lsu.edu> | 2010-12-07 23:12:28 -0600 |
commit | 881ce25beb22a920b462da9174cdd471385ec31c (patch) | |
tree | 8d3a5af8813182a0ce41a8971a253726ec0808e1 /m | |
parent | 904eace3a7e2966f075465db720c99a49f6b6e09 (diff) |
Correct boundary conditions for ADMConstraints and ADMQuantities
Diffstat (limited to 'm')
-rw-r--r-- | m/McLachlan_ADMConstraints.m | 19 | ||||
-rw-r--r-- | m/McLachlan_ADMQuantities.m | 19 |
2 files changed, 2 insertions, 36 deletions
diff --git a/m/McLachlan_ADMConstraints.m b/m/McLachlan_ADMConstraints.m index d0aca9e..325301b 100644 --- a/m/McLachlan_ADMConstraints.m +++ b/m/McLachlan_ADMConstraints.m @@ -223,7 +223,7 @@ groups = Join [declaredGroups, extraGroups]; ADMConstraintsCalc = { Name -> ADMConstraints, - Schedule -> {"IN MoL_PseudoEvolution BEFORE " <> ADMConstraints <> "_SelectBoundConds"}, + Schedule -> Automatic, Where -> Interior, Shorthands -> {detg, gu[ua,ub], G[ua,lb,lc], R[la,lb], trR, Km[la,lb], trK, @@ -259,20 +259,6 @@ ADMConstraintsCalc = } }; -(* -ADMConstraintsBoundaryCalc = -{ - Name -> ADMConstraints <> "_boundary", - Schedule -> {"IN MoL_PseudoEvolution BEFORE " <> ADMConstraints <> "_SelectBoundConds"}, - Where -> BoundaryWithGhosts, - Equations -> - { - H -> 0, - M[la] -> 0 - } -}; -*) - (******************************************************************************) (* Implementations *) (******************************************************************************) @@ -293,9 +279,6 @@ inheritedImplementations = calculations = { ADMConstraintsCalc -(* - ADMConstraintsBoundaryCalc -*) }; CreateKrancThornTT [groups, ".", ADMConstraints, diff --git a/m/McLachlan_ADMQuantities.m b/m/McLachlan_ADMQuantities.m index 8be9fed..a970d2d 100644 --- a/m/McLachlan_ADMQuantities.m +++ b/m/McLachlan_ADMQuantities.m @@ -227,7 +227,7 @@ groups = Join [declaredGroups, extraGroups]; ADMQuantitiesCalc = { Name -> ADMQuantities, - Schedule -> {"IN MoL_PseudoEvolution BEFORE " <> ADMQuantities <> "_SelectBoundConds"}, + Schedule -> Automatic, Where -> Interior, Shorthands -> {detgt, gtu[ua,ub], dgtu[ua,ub,lc], Gtl[la,lb,lc], Gtlu[la,lb,uc], Gt[ua,lb,lc], @@ -292,20 +292,6 @@ ADMQuantitiesCalc = } }; -(* -ADMQuantitiesBoundaryCalc = -{ - Name -> ADMQuantities <> "_boundary", - Schedule -> {"IN MoL_PseudoEvolution BEFORE " <> ADMQuantities <> "_SelectBoundConds"}, - Where -> BoundaryWithGhosts, - Equations -> - { - Madm -> 0, - Jadm[la] -> 0 - } -}; -*) - (******************************************************************************) (* Implementations *) (******************************************************************************) @@ -338,9 +324,6 @@ intParameters = calculations = { ADMQuantitiesCalc -(* - ADMQuantitiesBoundaryCalc -*) }; CreateKrancThornTT [groups, ".", ADMQuantities, |