New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 8321 for branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrst.F90 – NEMO

Ignore:
Timestamp:
2017-07-11T20:33:18+02:00 (7 years ago)
Author:
clem
Message:

STEP3 (1): clean separation between sea-ice and ocean

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrst.F90

    r8316 r8321  
    3232   PUBLIC   lim_rst_opn    ! routine called by icestep.F90 
    3333   PUBLIC   lim_rst_write  ! routine called by icestep.F90 
    34    PUBLIC   lim_rst_read   ! routine called by sbc_lim_init 
     34   PUBLIC   lim_rst_read   ! routine called by ice_init 
    3535 
    3636   LOGICAL, PUBLIC ::   lrst_ice         !: logical to control the ice restart write  
    … …  
    636636      ENDIF 
    637637      ! 
    638       !CALL iom_close( numrir ) !clem: closed in sbcice_lim.F90 
     638      !CALL iom_close( numrir ) !clem: closed in icestp.F90 
    639639      ! 
    640640      CALL wrk_dealloc( jpi, jpj, z2d ) 
Note: See TracChangeset for help on using the changeset viewer.