diff options
Diffstat (limited to 'src/dissipation.c')
| -rw-r--r-- | src/dissipation.c | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/dissipation.c b/src/dissipation.c index 638a47a..59daa23 100644 --- a/src/dissipation.c +++ b/src/dissipation.c @@ -7,6 +7,16 @@ #include "cctk_Arguments.h" #include "cctk_Parameters.h" +void CCTK_FCALL CCTK_FNAME(dissipation_4_3_opt) (const CCTK_REAL *var, + const CCTK_INT *lsh, + const CCTK_INT *gsh, + const CCTK_INT *lbnd, + const CCTK_INT *bbox, + const CCTK_INT *gsize, + const CCTK_REAL *dx, + const CCTK_REAL *epsdis, + const CCTK_REAL *diss_fraction, + CCTK_REAL *rhs); void CCTK_FCALL CCTK_FNAME(dissipation_6_5) (const CCTK_REAL *var, const CCTK_INT *ni, const CCTK_INT *nj, @@ -124,6 +134,12 @@ apply (int const varindex, char const * const optstring, void * const arg) } } else { switch(order) { + case 4: { + CCTK_FNAME(dissipation_4_3_opt) + (varptr, cctk_lsh, cctk_gsh, cctk_lbnd, + bbox, gsize, dx, &epsdis, &diss_fraction, rhsptr); + break; + } case 6: { CCTK_FNAME(dissipation_6_5) (varptr, &cctk_lsh[0], &cctk_lsh[1], &cctk_lsh[2], |