diff options
-rw-r--r-- | param.ccl | 2 | ||||
-rw-r--r-- | src/InitialData.F77 | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -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) |