diff options
| author | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2007-10-19 09:24:47 +0000 |
|---|---|---|
| committer | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2007-10-19 09:24:47 +0000 |
| commit | b05ae4f1041d3c1c3381a093170c1fd805fc4517 (patch) | |
| tree | 3687b5375da993118f183367fc20c778c2ce32a3 /src/get_coeffs2.c | |
| parent | a3fe6b12fe51b96ca0e2abb0e4b16c9ae04bf0fd (diff) | |
Added 6-3 minimal bandwidth 2nd derivative operators. Added 4-2 minimal
bandwidth 2nd derivative operators. Moved the 4-2 optimised operators.
Fixed missing break statements get_up_coeffs.c.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@89 f69c4107-0314-4c4f-9ad4-17e986b73f4a
Diffstat (limited to 'src/get_coeffs2.c')
| -rw-r--r-- | src/get_coeffs2.c | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/src/get_coeffs2.c b/src/get_coeffs2.c index 9d2a0ea..9d13dec 100644 --- a/src/get_coeffs2.c +++ b/src/get_coeffs2.c @@ -39,6 +39,20 @@ void DiffCoeff2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir, CCTK_INT *imin, CCTK_INT *imax, CCTK_REAL *q); + void CCTK_FCALL CCTK_FNAME(set_coeff2_4_2_opt)(const CCTK_INT *nsize, + const CCTK_INT *loc_order, + const CCTK_INT *bb, + const CCTK_INT *gsize, + CCTK_INT *imin, + CCTK_INT *imax, + CCTK_REAL *q); + void CCTK_FCALL CCTK_FNAME(set_coeff2_6_3)(const CCTK_INT *nsize, + const CCTK_INT *loc_order, + const CCTK_INT *bb, + const CCTK_INT *gsize, + CCTK_INT *imin, + CCTK_INT *imax, + CCTK_REAL *q); ni = cctk_lsh[0]; nj = cctk_lsh[1]; nk = cctk_lsh[2]; @@ -89,6 +103,10 @@ void DiffCoeff2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir, CCTK_FNAME(set_coeff2_4_2)(&nsize,&loc_order,bb,&gsize,imin,imax,q); break; } + case 6: { + CCTK_FNAME(set_coeff2_6_3)(&nsize,&loc_order,bb,&gsize,imin,imax,q); + break; + } default: CCTK_WARN (0, "Unknown stencil specified"); } @@ -102,6 +120,10 @@ void DiffCoeff2 ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir, CCTK_FNAME(set_coeff2_4_2)(&nsize,&loc_order,bb,&gsize,imin,imax,q); break; } + case 6: { + CCTK_FNAME(set_coeff2_6_3)(&nsize,&loc_order,bb,&gsize,imin,imax,q); + break; + } default: CCTK_WARN (0, "Unknown stencil specified"); } |