diff options
| author | lanfer <lanfer@f80f6fb6-8356-4fd4-90bc-d84ad503c100> | 2000-01-07 13:56:24 +0000 |
|---|---|---|
| committer | lanfer <lanfer@f80f6fb6-8356-4fd4-90bc-d84ad503c100> | 2000-01-07 13:56:24 +0000 |
| commit | 0d77eacdf2404300eba3f261bd14b2b834f05a0f (patch) | |
| tree | a823d3d5081999ad896808d6fddbcfce79f4fea3 | |
| parent | 5f9fef1144cb963b17187f64a3ffd012980d77cf (diff) | |
use DECLARE_CCTK_FUNCTIONS
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyF90/trunk@31 f80f6fb6-8356-4fd4-90bc-d84ad503c100
| -rw-r--r-- | src/WaveToy.F | 2 |
1 files changed, 1 insertions, 1 deletions
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 |