From 4eb86fb0087a2639cac180e5e836d7884f5e8648 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@f80f6fb6-8356-4fd4-90bc-d84ad503c100>
Date: Mon, 27 Oct 2003 15:31:28 +0000
Subject: 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.cactuscode.org/arrangements/CactusWave/WaveToyF90/trunk@85 f80f6fb6-8356-4fd4-90bc-d84ad503c100
---
 src/WaveToy.F | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/WaveToy.F b/src/WaveToy.F
index 8738576..6e73ae6 100644
--- a/src/WaveToy.F
+++ b/src/WaveToy.F
@@ -8,9 +8,9 @@
  @@*/
 
 #include "cctk.h"
-#include "cctk_Faces.h"
 #include "cctk_Parameters.h"
 #include "cctk_Arguments.h"
+#include "cctk_Functions.h"
 
 #define BOUNDARY_ERROR       if (ierr < 0)  call CCTK_WARN(0,"WaveToyF90_Boundaries: Error in boundary routines") 
 
@@ -109,7 +109,6 @@
       DECLARE_CCTK_ARGUMENTS
       DECLARE_CCTK_PARAMETERS
       DECLARE_CCTK_FUNCTIONS
-      CCTK_INT Boundary_SelectVarForBC
 
       integer i
       integer :: ierr=0
-- 
cgit v1.2.3