Merge branch 'master' into binaries

This commit is contained in:
Grzegorz Kowal 2018-01-17 08:28:13 -02:00
commit ec0da99053

View File

@ -1189,7 +1189,7 @@ module equations
!
np = 0
p = 1
do while (n < 2 .and. p < 3)
do while (np < 2 .and. p <= 4)
il = max( 1, i - p)
iu = min(im, i + p)
jl = max( 1, j - p)