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

Changeset 1240


Ignore:
Timestamp:
2008-12-31T12:02:34+01:00 (15 years ago)
Author:
ctlod
Message:

replace nn_ico_cpl by kico name to be coherent, see ticket: #295

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/SBC/sbcice_lim.F90

    r1239 r1240  
    259259      ! Ice/Ocean stresses (nn_ico_cpl=1 or 2 cases) !  at all ocean time step  ! 
    260260      !                                              !--------------------------! 
    261       IF( ln_limdyn .AND. nn_ico_cpl /= 0 )   & 
    262          &                CALL lim_sbc_tau( kt, nn_ico_cpl )  
     261      IF( ln_limdyn .AND. kico /= 0 )   & 
     262         &                CALL lim_sbc_tau( kt, kico )  
    263263!!gm   remark, in this case the ocean-ice stress is not saved in diag call above .....  find a solution!!! 
    264264      ! 
Note: See TracChangeset for help on using the changeset viewer.