From 0d77eacdf2404300eba3f261bd14b2b834f05a0f Mon Sep 17 00:00:00 2001 From: lanfer Date: Fri, 7 Jan 2000 13:56:24 +0000 Subject: use DECLARE_CCTK_FUNCTIONS git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyF90/trunk@31 f80f6fb6-8356-4fd4-90bc-d84ad503c100 --- src/WaveToy.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/WaveToy.F b/src/WaveToy.F index 25f0c65..7bebb40 100644 --- a/src/WaveToy.F +++ b/src/WaveToy.F @@ -115,9 +115,9 @@ DECLARE_CCTK_FARGUMENTS DECLARE_CCTK_PARAMETERS + DECLARE_CCTK_FUNCTIONS integer :: ierr - integer CCTK_Equals integer,dimension(3):: sw=1 CCTK_REAL,parameter :: zero = 0.0 CCTK_REAL,parameter :: one = 1.0 -- cgit v1.2.3