diff options
author | schnetter <> | 2003-10-27 14:31:00 +0000 |
---|---|---|
committer | schnetter <> | 2003-10-27 14:31:00 +0000 |
commit | 656b9c64b2ce01a5d40bc0a61a30ec362784cf68 (patch) | |
tree | 91e5bd082528c31fa9583eb937588e2cddb1b6ee /CarpetExtra/FOWaveToyF77 | |
parent | d224598c9fd5042022184215655ece15d2ee0a9a (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.F77 | 5 |
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/ |