diff options
author | allen <allen@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-06-25 09:33:43 +0000 |
---|---|---|
committer | allen <allen@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-06-25 09:33:43 +0000 |
commit | 813f88567ff43f38692ec43f1a5a93a69dd34c5a (patch) | |
tree | d9c8842ddb8dc5620e2c39ef94dca8405071de70 /src/AHFinder_mask.F | |
parent | 91cef16950abc8508421b44eb9e4a60c6a01dc99 (diff) |
FARGUMENTS -> ARGUMENTS
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@211 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_mask.F')
-rw-r--r-- | src/AHFinder_mask.F | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/AHFinder_mask.F b/src/AHFinder_mask.F index 7f23c20..aea095b 100644 --- a/src/AHFinder_mask.F +++ b/src/AHFinder_mask.F @@ -11,7 +11,7 @@ #include "cctk_Parameters.h" #include "cctk_Arguments.h" - subroutine AHFinder_mask(CCTK_FARGUMENTS,rhor) + subroutine AHFinder_mask(CCTK_ARGUMENTS,rhor) ! Set up the horizon mask. All this routine does is ! set up the value of the grid function "ahmask" to zero @@ -25,7 +25,7 @@ implicit none - DECLARE_CCTK_FARGUMENTS + DECLARE_CCTK_ARGUMENTS DECLARE_CCTK_PARAMETERS DECLARE_CCTK_FUNCTIONS @@ -50,7 +50,7 @@ ! *** FIND HORIZON FUNCTION *** ! ********************************* - call AHFinder_fun(CCTK_FARGUMENTS) + call AHFinder_fun(CCTK_ARGUMENTS) ! *********************************** |