diff options
author | jthorn <jthorn@df1f8a13-aa1d-4dd4-9681-27ded5b42416> | 2003-07-06 11:39:36 +0000 |
---|---|---|
committer | jthorn <jthorn@df1f8a13-aa1d-4dd4-9681-27ded5b42416> | 2003-07-06 11:39:36 +0000 |
commit | e9f00ac8be804694fed90fee6dfaa45f9438ebb8 (patch) | |
tree | 751937dea2db230245a372c7fc9d1e878352a2e8 /src/GeneralizedPolynomial-Uniform/common/store.c | |
parent | dcba423b1b91d1b9dc3a4e7c3ac7812e30f1f00c (diff) |
Remove Jonathan Thornburg's interpolator
(which is GPL and thus not allowed to be in CactusBase;
it now lives in AEIThorns/AEILocalInterp/)
so this thorn contains only the interpolator written by Thomas Radke
in early 2001.
The files for this interpolator are now in src/ ; before this commit
they were in src/UniformCartesian/ .
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalInterp/trunk@154 df1f8a13-aa1d-4dd4-9681-27ded5b42416
Diffstat (limited to 'src/GeneralizedPolynomial-Uniform/common/store.c')
-rw-r--r-- | src/GeneralizedPolynomial-Uniform/common/store.c | 166 |
1 files changed, 0 insertions, 166 deletions
diff --git a/src/GeneralizedPolynomial-Uniform/common/store.c b/src/GeneralizedPolynomial-Uniform/common/store.c deleted file mode 100644 index d074b34..0000000 --- a/src/GeneralizedPolynomial-Uniform/common/store.c +++ /dev/null @@ -1,166 +0,0 @@ -/* store.c -- store molecule coefficients in Jacobian */ -/* $Header$ */ - -#include "cctk.h" -#include "../InterpLocalUniform.h" - -#include "structs.h" -#include "store.h" - -/******************************************************************************/ - -/* - * 1-D routines - */ - -#undef COEFF -#define COEFF(mi) Jacobian_ptr[Jacobian_mi_stride*mi] - -void LocalInterp_store_1d_cube2 - (fp factor, const struct coeffs_struct_1d_cube_size2 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size2/store-coeffs.c" -} - -void LocalInterp_store_1d_cube3 - (fp factor, const struct coeffs_struct_1d_cube_size3 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size3/store-coeffs.c" -} - -void LocalInterp_store_1d_cube4 - (fp factor, const struct coeffs_struct_1d_cube_size4 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size4/store-coeffs.c" -} - -void LocalInterp_store_1d_cube5 - (fp factor, const struct coeffs_struct_1d_cube_size5 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size5/store-coeffs.c" -} - -void LocalInterp_store_1d_cube6 - (fp factor, const struct coeffs_struct_1d_cube_size6 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size6/store-coeffs.c" -} - -void LocalInterp_store_1d_cube7 - (fp factor, const struct coeffs_struct_1d_cube_size7 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride) -{ -#include "1d.cube.size7/store-coeffs.c" -} - -/******************************************************************************/ - -/* - * 2-D routines - */ - -#undef COEFF -#define COEFF(mi,mj) Jacobian_ptr[ Jacobian_mi_stride*mi \ - + Jacobian_mj_stride*mj ] - -void LocalInterp_store_2d_cube2 - (fp factor, const struct coeffs_struct_2d_cube_size2 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride) -{ -#include "2d.cube.size2/store-coeffs.c" -} - -void LocalInterp_store_2d_cube3 - (fp factor, const struct coeffs_struct_2d_cube_size3 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride) -{ -#include "2d.cube.size3/store-coeffs.c" -} - -void LocalInterp_store_2d_cube4 - (fp factor, const struct coeffs_struct_2d_cube_size4 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride) -{ -#include "2d.cube.size4/store-coeffs.c" -} - -void LocalInterp_store_2d_cube5 - (fp factor, const struct coeffs_struct_2d_cube_size5 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride) -{ -#include "2d.cube.size5/store-coeffs.c" -} - -void LocalInterp_store_2d_cube6 - (fp factor, const struct coeffs_struct_2d_cube_size6 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride) -{ -#include "2d.cube.size6/store-coeffs.c" -} - -/******************************************************************************/ - -/* - * 3-D routines - */ - -#undef COEFF -#define COEFF(mi,mj,mk) Jacobian_ptr[ Jacobian_mi_stride*mi \ - + Jacobian_mj_stride*mj \ - + Jacobian_mk_stride*mk ] - -void LocalInterp_store_3d_cube2 - (fp factor, const struct coeffs_struct_3d_cube_size2 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride, int Jacobian_mk_stride) -{ -#include "3d.cube.size2/store-coeffs.c" -} - -void LocalInterp_store_3d_cube3 - (fp factor, const struct coeffs_struct_3d_cube_size3 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride, int Jacobian_mk_stride) -{ -#include "3d.cube.size3/store-coeffs.c" -} - -void LocalInterp_store_3d_cube4 - (fp factor, const struct coeffs_struct_3d_cube_size4 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride, int Jacobian_mk_stride) -{ -#include "3d.cube.size4/store-coeffs.c" -} - -void LocalInterp_store_3d_cube5 - (fp factor, const struct coeffs_struct_3d_cube_size5 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride, int Jacobian_mk_stride) -{ -#include "3d.cube.size5/store-coeffs.c" -} - -void LocalInterp_store_3d_cube6 - (fp factor, const struct coeffs_struct_3d_cube_size6 *coeffs, - fp Jacobian_ptr[], - int Jacobian_mi_stride, int Jacobian_mj_stride, int Jacobian_mk_stride) -{ -#include "3d.cube.size6/store-coeffs.c" -} |