From 7b19cf9e45a54c3ab719e05d4e0c6122f9f36664 Mon Sep 17 00:00:00 2001
From: rhaas <rhaas@b6729ddc-ac74-4bd1-908c-9dc7244c52a1>
Date: Thu, 29 Nov 2012 06:42:10 +0000
Subject: 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
---
 configuration.ccl          | 3 +++
 src/GRHydro_Separation.F90 | 4 ++++
 2 files changed, 7 insertions(+)

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
-- 
cgit v1.2.3