aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorallen <allen@f5a6acaf-da7d-456b-b0a8-35edbc60b392>1999-09-11 16:17:17 +0000
committerallen <allen@f5a6acaf-da7d-456b-b0a8-35edbc60b392>1999-09-11 16:17:17 +0000
commit6e5f89613a9d9d621cc02edfb0b01080ac323910 (patch)
tree1045c38bbb1045a03fb062dd8bae02f69065cbef /src
parent82752ba544c4aaffa72ffb777e4f41fe29e564e7 (diff)
Changes to include IDScalarWaveElliptic
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWave/trunk@8 f5a6acaf-da7d-456b-b0a8-35edbc60b392
Diffstat (limited to 'src')
-rw-r--r--src/InitialData.F778
1 files changed, 1 insertions, 7 deletions
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)