diff options
author | allen <allen@e296648e-0e4f-0410-bd07-d597d9acff87> | 2002-01-06 18:17:54 +0000 |
---|---|---|
committer | allen <allen@e296648e-0e4f-0410-bd07-d597d9acff87> | 2002-01-06 18:17:54 +0000 |
commit | ef887a8828a26a26e94c8671b6025dfff8b4df0b (patch) | |
tree | 5227501e940559e85feed434a7cc46eaf43609f2 /src/slice_initialize.F | |
parent | d41c9f2b97b75eb1d35e79089e65cd28369a7954 (diff) |
FARGUMENTS->ARGUMENTS
Added missing argument for CCTK_SyncGroup needed for Beta 11
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@49 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src/slice_initialize.F')
-rw-r--r-- | src/slice_initialize.F | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/slice_initialize.F b/src/slice_initialize.F index 3d0cbf0..c9a97d1 100644 --- a/src/slice_initialize.F +++ b/src/slice_initialize.F @@ -4,11 +4,11 @@ #include "cctk_Arguments.h" #include "CactusEinstein/Einstein/src/Einstein.h" - subroutine slice_initialize(CCTK_FARGUMENTS) + subroutine slice_initialize(CCTK_ARGUMENTS) implicit none - DECLARE_CCTK_FARGUMENTS + DECLARE_CCTK_ARGUMENTS DECLARE_CCTK_PARAMETERS C Initialize position of slice in exact solution spacetime. @@ -23,7 +23,7 @@ C exact solution, and the exact solution time is a Gaussian. C Calculate Cauchy data and dx^A/dt. - call slice_data(CCTK_FARGUMENTS) + call slice_data(CCTK_ARGUMENTS) C This tells the code that what we have set is the physical metric, C not a conformally rescaled one. |