aboutsummaryrefslogtreecommitdiff
path: root/CarpetExtra/HydroToy
diff options
context:
space:
mode:
authorschnetter <>2003-10-27 14:31:00 +0000
committerschnetter <>2003-10-27 14:31:00 +0000
commit656b9c64b2ce01a5d40bc0a61a30ec362784cf68 (patch)
tree91e5bd082528c31fa9583eb937588e2cddb1b6ee /CarpetExtra/HydroToy
parentd224598c9fd5042022184215655ece15d2ee0a9a (diff)
Change include mechanism for aliased functions in Fortran. One now has to
Change include mechanism for aliased functions in Fortran. One now has to #include "cctk_Functions.h" and then use the macro DECLARE_CCTK_FUNCTIONS. darcs-hash:20031027143140-07bb3-c89b45361b934b875cad21d4f74b278d9eacdd46.gz
Diffstat (limited to 'CarpetExtra/HydroToy')
-rw-r--r--CarpetExtra/HydroToy/src/HydroToy.F773
-rw-r--r--CarpetExtra/HydroToy/src/InitSymBound.F773
2 files changed, 4 insertions, 2 deletions
diff --git a/CarpetExtra/HydroToy/src/HydroToy.F77 b/CarpetExtra/HydroToy/src/HydroToy.F77
index 4797162c4..f3569bb32 100644
--- a/CarpetExtra/HydroToy/src/HydroToy.F77
+++ b/CarpetExtra/HydroToy/src/HydroToy.F77
@@ -1,9 +1,10 @@
c -*-Fortran-*-
-c $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/src/HydroToy.F77,v 1.5 2001/04/23 08:10:19 schnetter Exp $
+c $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/src/HydroToy.F77,v 1.6 2003/10/27 15:31:40 schnetter Exp $
#include "cctk.h"
#include "cctk_Parameters.h"
#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
diff --git a/CarpetExtra/HydroToy/src/InitSymBound.F77 b/CarpetExtra/HydroToy/src/InitSymBound.F77
index af1ff6448..b73d5f177 100644
--- a/CarpetExtra/HydroToy/src/InitSymBound.F77
+++ b/CarpetExtra/HydroToy/src/InitSymBound.F77
@@ -1,9 +1,10 @@
c -*-Fortran-*-
-c $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/src/InitSymBound.F77,v 1.1 2001/03/18 22:37:09 eschnett Exp $
+c $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/src/InitSymBound.F77,v 1.2 2003/10/27 15:31:40 schnetter Exp $
#include "cctk.h"
#include "cctk_Arguments.h"
#include "cctk_Parameters.h"
+#include "cctk_Functions.h"
subroutine HydroToy_InitSymBound (CCTK_ARGUMENTS)