From 6e5f89613a9d9d621cc02edfb0b01080ac323910 Mon Sep 17 00:00:00 2001
From: allen <allen@f5a6acaf-da7d-456b-b0a8-35edbc60b392>
Date: Sat, 11 Sep 1999 16:17:17 +0000
Subject: Changes to include IDScalarWaveElliptic

git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWave/trunk@8 f5a6acaf-da7d-456b-b0a8-35edbc60b392
---
 src/InitialData.F77 | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

(limited to 'src')

diff --git a/src/InitialData.F77 b/src/InitialData.F77
index d33b56e..354a9e6 100644
--- a/src/InitialData.F77
+++ b/src/InitialData.F77
@@ -15,7 +15,7 @@
 
 
  /*@@
-   @routine    WaveToyF77_InitialData
+   @routine    IDScalarWave_InitialData
    @date       
    @author     Tom Goodale
    @desc 
@@ -40,15 +40,9 @@
 
       INTEGER    i,j,k
       CCTK_REAL  dt,omega, pi
-      CCTK_REAL  dx,dy,dz
 
       pi = 4.0*atan(1.0)
 
-c     Grid spacing shortcuts
-c     ----------------------
-      dx = cctk_delta_space(1)
-      dy = cctk_delta_space(2)
-      dz = cctk_delta_space(3)
       dt = cctk_delta_time
 
       omega = sqrt(kx**2+ky**2+kz**2)
-- 
cgit v1.2.3