diff options
author | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2005-01-07 13:18:35 +0000 |
---|---|---|
committer | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2005-01-07 13:18:35 +0000 |
commit | 560f8f0004ea1c497bd1d5e42944217c9c835152 (patch) | |
tree | e1549df6b610cf5972d29ec4037886510f04c6ba /src/set_norm_mask.F90 | |
parent | 2bd3c3a7d785398654dc3fae9790a0ca33957504 (diff) |
6th order interior, 5th order at the boundary finite differences (restricted
full norm). Thanks to José María Martín García for the mathematica notebook
that provided the coefficients. Not yot tested extensively, but seems to work.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@17 f69c4107-0314-4c4f-9ad4-17e986b73f4a
Diffstat (limited to 'src/set_norm_mask.F90')
-rw-r--r-- | src/set_norm_mask.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/set_norm_mask.F90 b/src/set_norm_mask.F90 index 1c9c2e7..c9b8ffb 100644 --- a/src/set_norm_mask.F90 +++ b/src/set_norm_mask.F90 @@ -73,7 +73,7 @@ subroutine SBP_SetNormMask (CCTK_ARGUMENTS) np = order else select case (order) - case (4) + case (4,6) bmask(1:3) = bmask_3 np = 3 end select |