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 8331 for branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90 – NEMO

Ignore:
Timestamp:
2017-07-13T19:17:41+02:00 (7 years ago)
Author:
clem
Message:

correct a bug introduced at r8324

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90

    r8324 r8331  
    304304      !                                ! Allocate the ice arrays (sbc_ice already allocated in sbc_init) 
    305305      ierr =        ice_alloc        ()      ! ice variables 
     306      ierr = ierr + sbc_ice_alloc    ()      ! surface forcing  
    306307      ierr = ierr + thd_ice_alloc    ()      ! thermodynamics 
    307308      IF( ln_limdyn )   ierr = ierr + lim_itd_me_alloc ()      ! ice thickness distribution - mechanics 
Note: See TracChangeset for help on using the changeset viewer.