Change to dealloc_grid in CICE_InitMod.F90 (CICE-Consortium#911)

apcraig · Nov 20, 2023 · 1cf109b · 1cf109b
1 parent d14bb69
commit 1cf109b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/cicecore/drivers/nuopc/cmeps/CICE_InitMod.F90 b/cicecore/drivers/nuopc/cmeps/CICE_InitMod.F90
@@ -32,7 +32,7 @@ subroutine cice_init1()
 
     use ice_init          , only: input_data
     use ice_init_column   , only: input_zbgc, count_tracers
-    use ice_grid          , only: init_grid1, alloc_grid, dealloc_grid
+    use ice_grid          , only: init_grid1, alloc_grid
     use ice_domain        , only: init_domain_blocks
     use ice_arrays_column , only: alloc_arrays_column
     use ice_state         , only: alloc_state
@@ -86,6 +86,7 @@ subroutine cice_init2()
     use ice_forcing          , only: init_snowtable
     use ice_forcing_bgc      , only: get_forcing_bgc, get_atm_bgc
     use ice_forcing_bgc      , only: faero_default, alloc_forcing_bgc, fiso_default
+    use ice_grid             , only: dealloc_grid
     use ice_history          , only: init_hist, accum_hist
     use ice_restart_shared   , only: restart, runtype
     use ice_init             , only: input_data, init_state