aboutsummaryrefslogtreecommitdiff
path: root/CarpetExtra/FOWaveToyF77
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/FOWaveToyF77
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/FOWaveToyF77')
-rw-r--r--CarpetExtra/FOWaveToyF77/src/FOWaveToy.F775
1 files changed, 1 insertions, 4 deletions
diff --git a/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77 b/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77
index 829961283..a89c8cd57 100644
--- a/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77
+++ b/CarpetExtra/FOWaveToyF77/src/FOWaveToy.F77
@@ -13,9 +13,9 @@ c -*-Fortran-*-
@@*/
#include "cctk.h"
-#include "cctk_Faces.h"
#include "cctk_Parameters.h"
#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
@@ -127,9 +127,6 @@ c ----------------
DECLARE_CCTK_PARAMETERS
DECLARE_CCTK_FUNCTIONS
- external Boundary_SelectGroupForBC
- CCTK_INT Boundary_SelectGroupForBC
-
c Local declarations
integer table
data table /-1/