diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-15 08:51:01 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-15 08:51:01 +0000 |
commit | b83b5327ad981259fc46e9fbcdf304511cbe0c3e (patch) | |
tree | d7869e429d71d8b427abfb372afdfe32e16898b4 /src | |
parent | 6e7543aa84a1508e7b4ef54b73cefb6fa67b152c (diff) |
Added CCTK_DECLARE_FUNCTIONS
git-svn-id: http://svn.cactuscode.org/flesh/trunk@919 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src')
-rw-r--r-- | src/include/cctk.h | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/src/include/cctk.h b/src/include/cctk.h index e4092fa3..3fbc90d2 100644 --- a/src/include/cctk.h +++ b/src/include/cctk.h @@ -15,7 +15,6 @@ #include "config.h" - /* The thorn definitions #define <PACKAGE>_<THORN> */ #include "definethorn.h" @@ -31,7 +30,12 @@ #define CCTK_PRINTSEPARATOR\ print *,"-----------------------------------------------------------" -#define _CCTK_FARGUMENTS cctk_dim, cctk_gsh, cctk_lsh, cctk_lbnd, cctk_ubnd, cctk_from, cctk_to, cctk_bbox, cctk_delta_time, cctk_time, cctk_delta_space, cctk_origin_space, cctk_levfac, cctk_convlevel, cctk_nghostzones, cctk_iteration, cctkGH +#define _CCTK_FARGUMENTS cctk_dim, cctk_gsh, cctk_lsh, cctk_lbnd, \ + cctk_ubnd, cctk_from, cctk_to, cctk_bbox, \ + cctk_delta_time, cctk_time, cctk_delta_space, \ + cctk_origin_space, cctk_levfac, cctk_convlevel, \ + cctk_nghostzones, cctk_iteration, cctkGH + #define _DECLARE_CCTK_FARGUMENTS INTEGER cctk_dim&&\ INTEGER cctk_gsh(cctk_dim),cctk_lsh(cctk_dim)&&\ INTEGER cctk_lbnd(cctk_dim),cctk_ubnd(cctk_dim)&&\ @@ -54,15 +58,20 @@ #define CCTK_DELTA_SPACE(x) cctk_delta_space(x)/cctk_levfac(x) #define CCTK_DELTA_TIME cctk_delta_time +#define CCTK_DECLARE_FUNCTIONS integer CCTK_Equals, CCTK_MyProc, CCTK_nProcs + #endif /*FCODE*/ #ifdef CCODE #include "cGH.h" +/*#include "cctk_Flesh.h" +#include "cctk_Comm.h" +#include "cctk_IO.h"*/ #define CCTK_GFINDEX3D(GH,i,j,k) ((i) + GH->cctk_lsh[0]*((j)+GH->cctk_lsh[1]*(k))) #define CCTK_GFINDEX2D(GH,i,j) ((i) + GH->cctk_lsh[0]*((j))) -#define CCTK_GFINDEX1D(GH,i) (i) +#define CCTK_GFINDEX1D(GH,i) (i) #define CCTK_PRINTSEPARATOR \ |