diff options
Diffstat (limited to 'src/GeneralizedPolynomial-Uniform/common/fetch-template.c')
-rw-r--r-- | src/GeneralizedPolynomial-Uniform/common/fetch-template.c | 94 |
1 files changed, 0 insertions, 94 deletions
diff --git a/src/GeneralizedPolynomial-Uniform/common/fetch-template.c b/src/GeneralizedPolynomial-Uniform/common/fetch-template.c deleted file mode 100644 index 5da0b01..0000000 --- a/src/GeneralizedPolynomial-Uniform/common/fetch-template.c +++ /dev/null @@ -1,94 +0,0 @@ -/* fetch-template.c -- template for fetch functions */ -/* $Header$ */ - -/* - * Each of the functions defined in this file fetches a molecule-sized - * piece of an input array into a data struct. There is one function for - * each combination of molecule size and input array datatype. - */ - -/******************************************************************************/ - -/* - * fetch-data routines for real datatypes - */ - -#undef DATA -#define DATA DATA_REAL - -void FETCH_FUNCTION_NAME(r)(const CCTK_REAL *ptr, - INT_STRIDE_IJK, - struct DATA_STRUCT *data) -{ -#include FETCH_DATA_FILE_NAME -} - -#ifdef HAVE_CCTK_REAL4 - void FETCH_FUNCTION_NAME(r4)(const CCTK_REAL4 *ptr, - INT_STRIDE_IJK, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif - -#ifdef HAVE_CCTK_REAL8 - void FETCH_FUNCTION_NAME(r8)(const CCTK_REAL8 *ptr, - INT_STRIDE_IJK, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif - -#ifdef HAVE_CCTK_REAL16 - void FETCH_FUNCTION_NAME(r16)(const CCTK_REAL16 *ptr, - INT_STRIDE_IJK, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif - -/******************************************************************************/ - -/* - * fetch-data routines for complex datatypes - */ - -#undef DATA -#define DATA DATA_COMPLEX - -void FETCH_FUNCTION_NAME(c)(const CCTK_REAL (*ptr)[COMPLEX_N_PARTS], - INT_STRIDE_IJK, int part, - struct DATA_STRUCT *data) -{ -#include FETCH_DATA_FILE_NAME -} - -#ifdef HAVE_CCTK_COMPLEX8 - void FETCH_FUNCTION_NAME(c8)(const CCTK_REAL4 (*ptr)[COMPLEX_N_PARTS], - INT_STRIDE_IJK, int part, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif - -#ifdef HAVE_CCTK_COMPLEX16 - void FETCH_FUNCTION_NAME(c16)(const CCTK_REAL8 (*ptr)[COMPLEX_N_PARTS], - INT_STRIDE_IJK, int part, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif - -#ifdef HAVE_CCTK_COMPLEX32 - void FETCH_FUNCTION_NAME(c32)(const CCTK_REAL16 (*ptr)[COMPLEX_N_PARTS], - INT_STRIDE_IJK, int part, - struct DATA_STRUCT *data) - { - #include FETCH_DATA_FILE_NAME - } -#endif |