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 4893 – NEMO

Changeset 4893


Ignore:
Timestamp:
2014-11-27T13:56:09+01:00 (9 years ago)
Author:
vancop
Message:

moved wrk_dealloc

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2014/dev_4728_CNRS04_coupled_interface/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90

    r4885 r4893  
    357357         IF( ln_nicep )   CALL lim_ctl( kt )              ! alerts in case of model crash 
    358358         ! 
     359 
     360         CALL wrk_dealloc( jpi,jpj,jpl, zalb_os, zalb_cs, zalb_ice ) 
     361 
    359362      ENDIF                                    ! End sea-ice time step only 
    360363 
    … …  
    369372!!gm   remark, the ocean-ice stress is not saved in ice diag call above .....  find a solution!!! 
    370373 
    371       CALL wrk_dealloc( jpi,jpj,jpl, zalb_os, zalb_cs, zalb_ice ) 
    372374 
    373375 
Note: See TracChangeset for help on using the changeset viewer.