aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorschnetter <schnetter@a678b1cf-93e1-4b43-a69d-d43939e66649>2003-10-27 15:31:28 +0000
committerschnetter <schnetter@a678b1cf-93e1-4b43-a69d-d43939e66649>2003-10-27 15:31:28 +0000
commit4191a735e35a09c8450c5529a33496d040411a6a (patch)
tree4281d4f35c782bc4b6e728cadbdf5e44918fa87c
parent91c8ead8d28b68ab8bac0ffc9ce1fa09f75adf6d (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/EinsteinInitialData/IDBrillData/trunk@91 a678b1cf-93e1-4b43-a69d-d43939e66649
-rw-r--r--src/brilldata.F1
-rw-r--r--src/brillq.F1
-rw-r--r--src/finishbrilldata.F1
-rw-r--r--src/setupbrilldata3D.F1
4 files changed, 4 insertions, 0 deletions
diff --git a/src/brilldata.F b/src/brilldata.F
index e38afaa..4a9a6d2 100644
--- a/src/brilldata.F
+++ b/src/brilldata.F
@@ -11,6 +11,7 @@
#include "cctk.h"
#include "cctk_Parameters.h"
#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
#include "CactusElliptic/EllBase/src/EllBase.h"
diff --git a/src/brillq.F b/src/brillq.F
index df6a65d..c3e8d6d 100644
--- a/src/brillq.F
+++ b/src/brillq.F
@@ -10,6 +10,7 @@
#include "cctk.h"
#include "cctk_Parameters.h"
+#include "cctk_Functions.h"
function brillq(rho,z,phi)
diff --git a/src/finishbrilldata.F b/src/finishbrilldata.F
index bd13c79..d2ecd1f 100644
--- a/src/finishbrilldata.F
+++ b/src/finishbrilldata.F
@@ -11,6 +11,7 @@
#include "cctk.h"
#include "cctk_Parameters.h"
#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
subroutine IDBrillData_Finish(CCTK_ARGUMENTS)
diff --git a/src/setupbrilldata3D.F b/src/setupbrilldata3D.F
index b77d886..7fb50a3 100644
--- a/src/setupbrilldata3D.F
+++ b/src/setupbrilldata3D.F
@@ -11,6 +11,7 @@
#include "cctk.h"
#include "cctk_Parameters.h"
#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
subroutine setupbrilldata3D(CCTK_ARGUMENTS)