diff options
| author | rhaas <rhaas@b6729ddc-ac74-4bd1-908c-9dc7244c52a1> | 2012-11-29 06:42:10 +0000 |
|---|---|---|
| committer | rhaas <rhaas@b6729ddc-ac74-4bd1-908c-9dc7244c52a1> | 2012-11-29 06:42:10 +0000 |
| commit | 7b19cf9e45a54c3ab719e05d4e0c6122f9f36664 (patch) | |
| tree | bb04a02e52d2b7ef6ef565f31313e142dc8fd750 | |
| parent | 33f90e296f921951c16687a559ab420e4702fe9e (diff) | |
Hydro_Analysis: use Fortran modules for prototypes if available
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/Hydro_Analysis/trunk@124 b6729ddc-ac74-4bd1-908c-9dc7244c52a1
| -rw-r--r-- | configuration.ccl | 3 | ||||
| -rw-r--r-- | src/GRHydro_Separation.F90 | 4 |
2 files changed, 7 insertions, 0 deletions
diff --git a/configuration.ccl b/configuration.ccl index 6909099..6f104d8 100644 --- a/configuration.ccl +++ b/configuration.ccl @@ -2,3 +2,6 @@ REQUIRES LoopControl +OPTIONAL Fortran +{ +} diff --git a/src/GRHydro_Separation.F90 b/src/GRHydro_Separation.F90 index 6dc434c..8175f9d 100644 --- a/src/GRHydro_Separation.F90 +++ b/src/GRHydro_Separation.F90 @@ -24,6 +24,10 @@ subroutine Hydro_Analysis_FindSeparation(CCTK_ARGUMENTS) +#ifdef HAVE_CAPABILITY_Fortran + use util_Table +#endif + implicit none DECLARE_CCTK_ARGUMENTS |