diff options
Diffstat (limited to 'src/Dissipation_6_5_min_err_coeff.F90')
| -rw-r--r-- | src/Dissipation_6_5_min_err_coeff.F90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Dissipation_6_5_min_err_coeff.F90 b/src/Dissipation_6_5_min_err_coeff.F90 index 4fe6120..1ce64f9 100644 --- a/src/Dissipation_6_5_min_err_coeff.F90 +++ b/src/Dissipation_6_5_min_err_coeff.F90 @@ -780,9 +780,9 @@ contains CCTK_INT, dimension(2), intent(in) :: bb CCTK_INT, intent(in) :: lsh, gsh, lbnd CCTK_REAL, intent(in) :: h, dfl - CCTK_INT :: n, nwt + CCTK_INT :: n CCTK_INT :: i - CCTK_REAL :: xp, xmax + CCTK_REAL :: xp CCTK_REAL :: zero = 0.0 integer, parameter :: wp = kind(zero) |