clean up debugging code and comments

E3SM-Project · Aug 30, 2024 · 36bb7c0 · 36bb7c0
1 parent f50d263
commit 36bb7c0
Showing 1 changed file with 0 additions and 9 deletions.
diff --git a/components/mpas-seaice/src/shared/mpas_seaice_icepack.F b/components/mpas-seaice/src/shared/mpas_seaice_icepack.F
@@ -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