diff options
Diffstat (limited to 'src/ConfPhys.c')
-rw-r--r-- | src/ConfPhys.c | 93 |
1 files changed, 20 insertions, 73 deletions
diff --git a/src/ConfPhys.c b/src/ConfPhys.c index c0e29cc..23ff5a8 100644 --- a/src/ConfPhys.c +++ b/src/ConfPhys.c @@ -34,27 +34,6 @@ CCTK_FILEVERSION(CactusEinstein_StaticConformal_ConfPhys_c) ********************* Other Routine Prototypes ********************* ********************************************************************/ -void CCTK_FCALL CCTK_FNAME (StaticConf_PhysToConfInPlace) (int *nx, - int *ny, - int *nz, - CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz); -void CCTK_FCALL CCTK_FNAME (StaticConf_ConfToPhysInPlace) (int *nx, - int *ny, - int *nz, - CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz); - /******************************************************************** ********************* Local Data ***************************** ********************************************************************/ @@ -63,7 +42,6 @@ void CCTK_FCALL CCTK_FNAME (StaticConf_ConfToPhysInPlace) (int *nx, ********************* External Routines ********************** ********************************************************************/ - /*@@ @routine StaticConf_ConfToPhysInPlace @date September 3rd 1999 @@ -118,16 +96,16 @@ void CCTK_FCALL CCTK_FNAME (StaticConf_ConfToPhysInPlace) (int *nx, @vio inout @@*/ -void StaticConf_ConfToPhysInPlace (int nx, - int ny, - int nz, - const CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz) +void StaticConf_ConfToPhysInPlace (CCTK_INT const nx, + CCTK_INT const ny, + CCTK_INT const nz, + const CCTK_REAL * restrict const psi, + CCTK_REAL * restrict const gxx, + CCTK_REAL * restrict const gxy, + CCTK_REAL * restrict const gxz, + CCTK_REAL * restrict const gyy, + CCTK_REAL * restrict const gyz, + CCTK_REAL * restrict const gzz) { CCTK_REAL psi4; int index; @@ -151,22 +129,6 @@ void StaticConf_ConfToPhysInPlace (int nx, } } - -void CCTK_FCALL CCTK_FNAME (StaticConf_ConfToPhysInPlace) (int *nx, - int *ny, - int *nz, - CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz) -{ - StaticConf_ConfToPhysInPlace (*nx, *ny, *nz, psi, gxx, gxy, gxz, gyy, gyz, gzz); -} - - /*@@ @routine StaticConf_PhysToConfInPlace @date September 3rd 1999 @@ -221,16 +183,16 @@ void CCTK_FCALL CCTK_FNAME (StaticConf_ConfToPhysInPlace) (int *nx, @vio inout @@*/ -void StaticConf_PhysToConfInPlace (int nx, - int ny, - int nz, - const CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz) +void StaticConf_PhysToConfInPlace (CCTK_INT const nx, + CCTK_INT const ny, + CCTK_INT const nz, + const CCTK_REAL * restrict const psi, + CCTK_REAL * restrict const gxx, + CCTK_REAL * restrict const gxy, + CCTK_REAL * restrict const gxz, + CCTK_REAL * restrict const gyy, + CCTK_REAL * restrict const gyz, + CCTK_REAL * restrict const gzz) { int index; CCTK_REAL psi4; @@ -257,21 +219,6 @@ void StaticConf_PhysToConfInPlace (int nx, } } - -void CCTK_FCALL CCTK_FNAME (StaticConf_PhysToConfInPlace) (int *nx, - int *ny, - int *nz, - CCTK_REAL *psi, - CCTK_REAL *gxx, - CCTK_REAL *gxy, - CCTK_REAL *gxz, - CCTK_REAL *gyy, - CCTK_REAL *gyz, - CCTK_REAL *gzz) -{ - StaticConf_PhysToConfInPlace (*nx, *ny, *nz, psi, gxx, gxy, gxz, gyy, gyz, gzz); -} - /******************************************************************** ********************* Local Routines ************************* ********************************************************************/ |