diff --git a/sources/interpolations.F90 b/sources/interpolations.F90 index 778de4b..edb5a3a 100644 --- a/sources/interpolations.F90 +++ b/sources/interpolations.F90 @@ -224,7 +224,7 @@ module interpolations ! calculate κ = (1 - ν) / ν ! - kappa = min(kappa, (1.0d+00 - cfl) / cfl) + kappa = max(kappa, (1.0d+00 - cfl) / cfl) ! correct central weight !