diff options
author | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2006-02-02 15:12:27 +0000 |
---|---|---|
committer | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2006-02-02 15:12:27 +0000 |
commit | c92386fd0eab5c2697ef3ab8c7c5531e0c1d42b3 (patch) | |
tree | a9d9df7c6a7f50ba268c28b79119004c64bc852b /src/dissipation.c | |
parent | 965d6456bd9091f2b8414a15506fe98b66491269 (diff) |
Kreiss-Oliger type dissipation operators compatible with the diagonal 4-2 and
6-3 derivative operators.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@55 f69c4107-0314-4c4f-9ad4-17e986b73f4a
Diffstat (limited to 'src/dissipation.c')
-rw-r--r-- | src/dissipation.c | 20 |
1 files changed, 16 insertions, 4 deletions
diff --git a/src/dissipation.c b/src/dissipation.c index 29dff9f..9c8a8a9 100644 --- a/src/dissipation.c +++ b/src/dissipation.c @@ -192,15 +192,27 @@ apply (int const varindex, char const * const optstring, void * const arg) break; } case 4: { - CCTK_FNAME(dissipation_4_2) - (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], + if ( CCTK_Equals(dissipation_type,"Mattson-Svard-Nordstrom") ) { + CCTK_FNAME(dissipation_4_2) + (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], + bbox, gsize, dx, &epsdis, rhsptr); + } else { + CCTK_FNAME(dissipation_4_2_alt) + (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], bbox, gsize, dx, &epsdis, rhsptr); + } break; } case 6: { - CCTK_FNAME(dissipation_6_3) - (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], + if ( CCTK_Equals(dissipation_type,"Mattson-Svard-Nordstrom") ) { + CCTK_FNAME(dissipation_6_3) + (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], + bbox, gsize, dx, &epsdis, rhsptr); + } else { + CCTK_FNAME(dissipation_6_3_alt) + (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], bbox, gsize, dx, &epsdis, rhsptr); + } break; } case 8: { |