From bfc63cbc948baa67f49b2ae53dcdcd1d94f54f3f Mon Sep 17 00:00:00 2001
From: rideout <rideout@daab82bb-f315-4ad1-b6d0-9353ff8b6e27>
Date: Wed, 26 Feb 2003 18:25:32 +0000
Subject: Include aliased functions, which now work from Fortran.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyFreeF90/trunk@50 daab82bb-f315-4ad1-b6d0-9353ff8b6e27
---
 interface.ccl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/interface.ccl b/interface.ccl
index 95db442..c99c1aa 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -12,3 +12,7 @@ cctk_real scalarevolve type=GF Timelevels=3
 {
   phi
 } "The evolved scalar field"
+
+CCTK_INT FUNCTION Boundary_SelectVarForBC(CCTK_POINTER GH, CCTK_INT faces, \
+  CCTK_INT table_handle, CCTK_STRING var_name, CCTK_STRING bc_name)
+USES FUNCTION Boundary_SelectVarForBC
-- 
cgit v1.2.3