diff options
| -rw-r--r-- | src/Derivatives_8_4_min_err_coeff.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Derivatives_8_4_min_err_coeff.F90 b/src/Derivatives_8_4_min_err_coeff.F90 index af9b15f..930da74 100644 --- a/src/Derivatives_8_4_min_err_coeff.F90 +++ b/src/Derivatives_8_4_min_err_coeff.F90 @@ -29,7 +29,7 @@ subroutine deriv_gf_8_4_opt ( var, ni, nj, nk, dir, bb, gsize, offset, delta, dv logical, save :: first = .true. if ( first ) then - call set_coeff_8_4_opt ( a, q ) + call coeffs_1_8_4_opt ( a, q ) first = .false. end if |