diff options
author | Erik Schnetter <schnetter@cct.lsu.edu> | 2007-11-07 14:13:00 +0000 |
---|---|---|
committer | Erik Schnetter <schnetter@cct.lsu.edu> | 2007-11-07 14:13:00 +0000 |
commit | 2bf0a51c8610fc9bee9bc08995c8c82462fa3faa (patch) | |
tree | 5e7d58aa2c00ba421f14b2f9baecaf470c30a033 /CarpetExtra/WaveToyMoL/src/calcrhs.F77 | |
parent | d071f07a55d995b58b0648e5d2b9a1ac3bf14a4b (diff) |
WaveToyMoL: Correct grid spacing indexing error
darcs-hash:20071107141347-dae7b-e2157d07048e20139f64726196bd1b4269794d9c.gz
Diffstat (limited to 'CarpetExtra/WaveToyMoL/src/calcrhs.F77')
-rw-r--r-- | CarpetExtra/WaveToyMoL/src/calcrhs.F77 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/CarpetExtra/WaveToyMoL/src/calcrhs.F77 b/CarpetExtra/WaveToyMoL/src/calcrhs.F77 index 371278970..32f744b70 100644 --- a/CarpetExtra/WaveToyMoL/src/calcrhs.F77 +++ b/CarpetExtra/WaveToyMoL/src/calcrhs.F77 @@ -22,7 +22,7 @@ if (cctk_bbox(2*d ).ne.0) imax(d) = cctk_lsh(d)-bndwidth end do do d=1,3 - dx(d) = CCTK_DELTA_SPACE(3) + dx(d) = CCTK_DELTA_SPACE(d) end do do k=imin(3),imax(3) do j=imin(2),imax(2) |