ice_grid: initialize 'l_readCenter' for all grid types

phil-blain · Aug 10, 2022 · a4cf10e · a4cf10e
1 parent 52fd683
commit a4cf10e
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/cicecore/cicedynB/infrastructure/ice_grid.F90 b/cicecore/cicedynB/infrastructure/ice_grid.F90
@@ -475,6 +475,8 @@ subroutine init_grid2
       ! lat, lon, cell widths, angle, land mask
       !-----------------------------------------------------------------
 
+      l_readCenter = .false.
+
       call icepack_query_parameters(pi_out=pi, pi2_out=pi2, puny_out=puny)
       call icepack_warnings_flush(nu_diag)
       if (icepack_warnings_aborted()) call abort_ice(error_message=subname, &