From 0d66e5f5f44d770c02e97b9926b2eab5a2929d52 Mon Sep 17 00:00:00 2001
From: goodale <goodale@f5a6acaf-da7d-456b-b0a8-35edbc60b392>
Date: Wed, 16 Jan 2002 03:13:33 +0000
Subject: Making the initial data consistent between the initial data thorns -
 in particular adding "none" to the C and C++ versions.

Tom


git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWave/trunk@52 f5a6acaf-da7d-456b-b0a8-35edbc60b392
---
 param.ccl           | 2 +-
 src/InitialData.F77 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/param.ccl b/param.ccl
index 16baf2a..3d3c0cb 100644
--- a/param.ccl
+++ b/param.ccl
@@ -21,7 +21,7 @@ private:
 
 REAL radius "The radius of the gaussian wave"
 {
- 0:*  :: "Positive"
+ 0:* :: "Positive"
 } 0.0
 
 REAL sigma "The sigma for the gaussian wave"
diff --git a/src/InitialData.F77 b/src/InitialData.F77
index 9b56815..8a8da75 100644
--- a/src/InitialData.F77
+++ b/src/InitialData.F77
@@ -109,7 +109,7 @@ c        Use kx,ky,kz as number of modes in each direction.
             end do
          end do
 
-      else
+      else if (CCTK_EQUALS(initial_data, "none")) then
          do k=1,cctk_lsh(3)
             do j=1,cctk_lsh(2)
                do i=1,cctk_lsh(1)
-- 
cgit v1.2.3