diff options
Diffstat (limited to 'src/call_derivs2.c')
-rw-r--r-- | src/call_derivs2.c | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/call_derivs2.c b/src/call_derivs2.c index 5ec2100..67f33f8 100644 --- a/src/call_derivs2.c +++ b/src/call_derivs2.c @@ -50,6 +50,15 @@ void DiffGv2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir1, const CCTK_INT *gsize, const CCTK_REAL *delta, CCTK_REAL *dvar2); + void CCTK_FCALL CCTK_FNAME(deriv2_gf_6_3)(const CCTK_REAL *var, + const CCTK_INT *ni, + const CCTK_INT *nj, + const CCTK_INT *nk, + const CCTK_INT *dir, + const CCTK_INT *bb, + const CCTK_INT *gsize, + const CCTK_REAL *delta, + CCTK_REAL *dvar2); void CCTK_FCALL CCTK_FNAME(deriv2_mixed)(const CCTK_POINTER_TO_CONST *cctkGH, const CCTK_INT *dir1, const CCTK_INT *dir2, @@ -120,6 +129,10 @@ void DiffGv2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir1, CCTK_FNAME(deriv2_gf_4_2)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,dvar2); break; } + case 6: { + CCTK_FNAME(deriv2_gf_6_3)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,dvar2); + break; + } default: CCTK_WARN (0, "Unknown 2nd derivative stencil specified"); } @@ -133,6 +146,10 @@ void DiffGv2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir1, CCTK_FNAME(deriv2_gf_4_2_opt)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,dvar2); break; } + case 6: { + CCTK_FNAME(deriv2_gf_6_3)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,dvar2); + break; + } default: CCTK_WARN (0, "Unknown stencil specified"); } |