Skip to content

Commit 41f9197

Browse files
committed
Correcting use statements for restarts in trunk hadgem3 driver
1 parent e1b82ff commit 41f9197

File tree

2 files changed

+15
-18
lines changed

2 files changed

+15
-18
lines changed

drivers/hadgem3/CICE_InitMod.F90

Lines changed: 9 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -168,29 +168,26 @@ end subroutine cice_init
168168
subroutine init_restart
169169

170170
use ice_aerosol, only: init_aerosol
171-
use ice_age, only: init_age
171+
use ice_age, only: init_age, restart_age, read_restart_age
172172
use ice_blocks, only: nx_block, ny_block
173173
use ice_brine, only: init_hbrine
174174
use ice_calendar, only: time, calendar
175175
use ice_domain, only: nblocks
176176
use ice_domain_size, only: ncat
177177
use ice_dyn_eap, only: read_restart_eap
178178
use ice_dyn_shared, only: kdyn
179-
use ice_firstyear, only: init_fy
179+
use ice_firstyear, only: init_fy, restart_FY, read_restart_FY
180180
use ice_flux, only: sss
181181
use ice_init, only: ice_ic
182-
use ice_lvl, only: init_lvl
183-
use ice_meltpond_cesm, only: init_meltponds_cesm
184-
use ice_meltpond_lvl, only: init_meltponds_lvl
185-
use ice_meltpond_topo, only: init_meltponds_topo
182+
use ice_lvl, only: init_lvl, restart_lvl, read_restart_lvl
183+
use ice_meltpond_cesm, only: init_meltponds_cesm, &
184+
restart_pond_cesm, read_restart_pond_cesm
185+
use ice_meltpond_lvl, only: init_meltponds_lvl, &
186+
restart_pond_lvl, read_restart_pond_lvl, dhsn
187+
use ice_meltpond_topo, only: init_meltponds_topo, &
188+
restart_pond_topo, read_restart_pond_topo
186189
use ice_restart_shared, only: runtype, restart
187190
use ice_restart_driver, only: restartfile, restartfile_v4
188-
use ice_restart_age, only: restart_age, read_restart_age
189-
use ice_restart_firstyear, only: restart_FY, read_restart_FY
190-
use ice_restart_lvl, only: restart_lvl, read_restart_lvl
191-
use ice_restart_meltpond_cesm, only: restart_pond_cesm, read_restart_pond_cesm
192-
use ice_restart_meltpond_lvl, only: restart_pond_lvl, read_restart_pond_lvl, dhsn
193-
use ice_restart_meltpond_topo, only: restart_pond_topo, read_restart_pond_topo
194191
use ice_state, only: tr_iage, tr_FY, tr_lvl, tr_pond_cesm, &
195192
tr_pond_lvl, tr_pond_topo, tr_aero, trcrn, &
196193
nt_iage, nt_FY, nt_alvl, nt_vlvl, nt_apnd, nt_hpnd, nt_ipnd, tr_brine

drivers/hadgem3/CICE_RunMod.F90

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -100,6 +100,7 @@ end subroutine CICE_Run
100100

101101
subroutine ice_step
102102

103+
use ice_age, only: write_restart_age
103104
use ice_aerosol, only: write_restart_aero
104105
use ice_boundary, only: ice_HaloUpdate
105106
use ice_brine, only: hbrine_diags, write_restart_hbrine
@@ -110,16 +111,15 @@ subroutine ice_step
110111
use ice_domain_size, only: nslyr
111112
use ice_dyn_eap, only: write_restart_eap
112113
use ice_dyn_shared, only: kdyn
114+
use ice_firstyear, only: write_restart_FY
113115
use ice_flux, only: scale_factor, init_history_therm
114116
use ice_history, only: accum_hist
117+
use ice_lvl, only: write_restart_lvl
115118
use ice_restart, only: final_restart
116119
use ice_restart_driver, only: dumpfile
117-
use ice_restart_age, only: write_restart_age
118-
use ice_restart_firstyear, only: write_restart_FY
119-
use ice_restart_lvl, only: write_restart_lvl
120-
use ice_restart_meltpond_cesm, only: write_restart_pond_cesm
121-
use ice_restart_meltpond_lvl, only: write_restart_pond_lvl
122-
use ice_restart_meltpond_topo, only: write_restart_pond_topo
120+
use ice_meltpond_cesm, only: write_restart_pond_cesm
121+
use ice_meltpond_lvl, only: write_restart_pond_lvl
122+
use ice_meltpond_topo, only: write_restart_pond_topo
123123
use ice_restoring, only: restore_ice, ice_HaloRestore
124124
use ice_state, only: nt_qsno, trcrn, tr_iage, tr_FY, tr_lvl, &
125125
tr_pond_cesm, tr_pond_lvl, tr_pond_topo, tr_brine, tr_aero

0 commit comments

Comments
 (0)