Skip to content
Closed
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
9 changes: 0 additions & 9 deletions components/mpas-seaice/src/shared/mpas_seaice_icepack.F
Original file line number Diff line number Diff line change
Expand Up @@ -10656,15 +10656,6 @@ subroutine init_icepack_package_configs(domain)

call seaice_icepack_write_warnings(icepack_warnings_aborted())

!note that icepack_recompute_constants, called from icepck_init_parameters above, recomputes Lfresh
! - make Lfresh optional for E3SM?

! tcraig, this will write out icepack parameters to fort.101, need to uncomment 3 lines
if (mpas_log_info % taskID == 0) then
call icepack_write_parameters(101)
endif
! call seaice_icepack_write_warnings(icepack_warnings_aborted())

call mpas_log_write(" ----- compare values after icepack init -----")

! Lfresh is derived in Icepack, not sent in from driver
Expand Down