diff options
| author | schnetter <schnetter@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2003-10-27 15:31:27 +0000 |
|---|---|---|
| committer | schnetter <schnetter@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2003-10-27 15:31:27 +0000 |
| commit | 12330918025efc50632ec2f3cf90a57dea4d4443 (patch) | |
| tree | ef4c2be0b051600ff44325efe6ffe820773e4093 | |
| parent | 6ccf50bf313375211b36449c0a3037b93d94ad02 (diff) | |
Change include mechanism for aliased functions in Fortran. One now has to
#include "cctk_Functions.h" and then use the macro
DECLARE_CCTK_FUNCTIONS.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@357 89daf98e-ef62-4674-b946-b8ff9de2216c
| -rw-r--r-- | src/AHFinder.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_ParamCheck.F90 | 1 | ||||
| -rw-r--r-- | src/AHFinder_dis.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_fun.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_gau.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_int.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_mask.F | 1 | ||||
| -rw-r--r-- | src/AHFinder_output.F | 1 | ||||
| -rw-r--r-- | src/SetSym.F | 1 |
9 files changed, 9 insertions, 0 deletions
diff --git a/src/AHFinder.F b/src/AHFinder.F index d0bb150..a4bfdaf 100644 --- a/src/AHFinder.F +++ b/src/AHFinder.F @@ -16,6 +16,7 @@ #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder(CCTK_ARGUMENTS) diff --git a/src/AHFinder_ParamCheck.F90 b/src/AHFinder_ParamCheck.F90 index 9d63f2e..7324dce 100644 --- a/src/AHFinder_ParamCheck.F90 +++ b/src/AHFinder_ParamCheck.F90 @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" #include "cctk_Parameters.h" ! CCTK_FILEVERSION(CactusEinstein_AHFinder_ParamCheck_f) diff --git a/src/AHFinder_dis.F b/src/AHFinder_dis.F index 01bb346..f0516a5 100644 --- a/src/AHFinder_dis.F +++ b/src/AHFinder_dis.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_dis(CCTK_ARGUMENTS) diff --git a/src/AHFinder_fun.F b/src/AHFinder_fun.F index 2790e56..e39cc2d 100644 --- a/src/AHFinder_fun.F +++ b/src/AHFinder_fun.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_fun(CCTK_ARGUMENTS) diff --git a/src/AHFinder_gau.F b/src/AHFinder_gau.F index 85d91fb..98be8f6 100644 --- a/src/AHFinder_gau.F +++ b/src/AHFinder_gau.F @@ -16,6 +16,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_gau(CCTK_ARGUMENTS) diff --git a/src/AHFinder_int.F b/src/AHFinder_int.F index 170a7ab..4e3c1b4 100644 --- a/src/AHFinder_int.F +++ b/src/AHFinder_int.F @@ -16,6 +16,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_int(CCTK_ARGUMENTS) diff --git a/src/AHFinder_mask.F b/src/AHFinder_mask.F index 816141c..de8f347 100644 --- a/src/AHFinder_mask.F +++ b/src/AHFinder_mask.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_mask(CCTK_ARGUMENTS,rhor) diff --git a/src/AHFinder_output.F b/src/AHFinder_output.F index ba3ef9d..4aceea2 100644 --- a/src/AHFinder_output.F +++ b/src/AHFinder_output.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_InitOutput(CCTK_ARGUMENTS) use AHFinder_dat diff --git a/src/SetSym.F b/src/SetSym.F index a7c331b..bf95b2b 100644 --- a/src/SetSym.F +++ b/src/SetSym.F @@ -9,6 +9,7 @@ #include "cctk.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" #include "cctk_Parameters.h" /*@@ |