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_flow.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_flow.F')
-rw-r--r-- | src/AHFinder_flow.F | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/AHFinder_flow.F b/src/AHFinder_flow.F index fff375b..043b629 100644 --- a/src/AHFinder_flow.F +++ b/src/AHFinder_flow.F @@ -16,13 +16,13 @@ #include "cctk_Parameters.h" #include "cctk_Arguments.h" - subroutine AHFinder_flow(CCTK_FARGUMENTS,rmx,status,logf) + subroutine AHFinder_flow(CCTK_ARGUMENTS,rmx,status,logf) use AHFinder_dat implicit none - DECLARE_CCTK_FARGUMENTS + DECLARE_CCTK_ARGUMENTS DECLARE_CCTK_PARAMETERS logical status,new,update @@ -133,9 +133,9 @@ ! *** FIND SPECTRAL COMPONENTS *** ! ************************************ - call AHFinder_fun(CCTK_FARGUMENTS) - call AHFinder_exp(CCTK_FARGUMENTS) - call AHFinder_int(CCTK_FARGUMENTS) + call AHFinder_fun(CCTK_ARGUMENTS) + call AHFinder_exp(CCTK_ARGUMENTS) + call AHFinder_int(CCTK_ARGUMENTS) ! ***************************** |