diff options
Diffstat (limited to 'src/macro/ADM_Spacing.h')
-rw-r--r-- | src/macro/ADM_Spacing.h | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/src/macro/ADM_Spacing.h b/src/macro/ADM_Spacing.h index 58087c8..00451c4 100644 --- a/src/macro/ADM_Spacing.h +++ b/src/macro/ADM_Spacing.h @@ -10,6 +10,8 @@ #ifndef ADM_SPACING_H #define ADM_SPACING_H +#ifdef FCODE + dt=CCTK_DELTA_TIME dx=CCTK_DELTA_SPACE(1) dy=CCTK_DELTA_SPACE(2) @@ -44,3 +46,42 @@ i36dyz=idyz/36.d0 #endif + +#ifdef CCODE + + dt=CCTK_DELTA_TIME; + dx=CCTK_DELTA_SPACE(1); + dy=CCTK_DELTA_SPACE(2); + dz=CCTK_DELTA_SPACE(3); + + idx=1.0/dx; + idy=1.0/dy; + idz=1.0/dz; + + i2dx=idx/2.0; + i2dy=idy/2.0; + i2dz=idz/2.0; + + i12dx=idx/12.0; + i12dy=idy/12.0; + i12dz=idz/12.0; + + idxx=idx*idx; + idyy=idy*idy; + idzz=idz*idz; + + i12dxx=idxx/12.0; + i12dyy=idyy/12.0; + i12dzz=idzz/12.0; + + idxy=i2dx*i2dy; + idxz=i2dx*i2dz; + idyz=i2dy*i2dz; + + i36dxy=idxy/36.0; + i36dxz=idxz/36.0; + i36dyz=idyz/36.0; + +#endif + +#endif |