diff options
-rw-r--r-- | src/Coefficients_6_3_min_err_coeff.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Coefficients_6_3_min_err_coeff.F90 b/src/Coefficients_6_3_min_err_coeff.F90 index 30054c9..c0eef1e 100644 --- a/src/Coefficients_6_3_min_err_coeff.F90 +++ b/src/Coefficients_6_3_min_err_coeff.F90 @@ -31,7 +31,7 @@ subroutine set_coeff_6_3_opt ( nsize, loc_order, bb, gsize, imin, imax, dd ) dd = zero imin = 0 - imax = 0 + imax = -1 if ( bb(1) == 0 ) then il = 1 + gsize |