diff options
Diffstat (limited to 'src/apply_dissipation.F77')
| -rw-r--r-- | src/apply_dissipation.F77 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/apply_dissipation.F77 b/src/apply_dissipation.F77 index 38d55f7..b5d6939 100644 --- a/src/apply_dissipation.F77 +++ b/src/apply_dissipation.F77 @@ -2,12 +2,12 @@ c $Header$ #include "cctk.h" - subroutine apply_dissipation (var, rhs, ni, nj, nk, dx, order, epsdis) + subroutine apply_dissipation (var, rhs, ni, nj, nk, dx, dt, order, epsdis) implicit none integer ni, nj, nk CCTK_REAL var(ni,nj,nk), rhs(ni,nj,nk) - CCTK_REAL dx(3) + CCTK_REAL dx(3), dt CCTK_INT order CCTK_REAL epsdis |