box2001: compute aiu with aice instead of aice_init

DeniseWorthen · Oct 28, 2020 · 12fdb47 · 12fdb47
1 parent 922b998
commit 12fdb47
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/cicecore/cicedynB/general/ice_forcing.F90 b/cicecore/cicedynB/general/ice_forcing.F90
@@ -5067,7 +5067,7 @@ subroutine box2001_data
       use ice_blocks, only: nx_block, ny_block, nghost
       use ice_flux, only: uocn, vocn, uatm, vatm, wind, rhoa, strax, stray
       use ice_grid, only: uvm, to_ugrid
-      use ice_state, only: aice_init
+      use ice_state, only: aice
 
       ! local parameters
 
@@ -5082,7 +5082,7 @@ subroutine box2001_data
       call icepack_query_parameters(pi_out=pi, pi2_out=pi2, puny_out=puny)
       call icepack_query_parameters(secday_out=secday)
 
-      call to_ugrid(aice_init, aiu)
+      call to_ugrid(aice, aiu)
 
       period = c4*secday