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 881 for branches/dev_001_SBC/NEMO/OPA_SRC/TRA/traadv_cen2.F90 – NEMO

Ignore:
Timestamp:
2008-04-08T11:45:52+02:00 (16 years ago)
Author:
ctlod
Message:

dev_001_SBC: Step I: change cpp ket name key_ice_lim into key_lim2 & change names inside modules with extension _2, see ticket: #110

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/dev_001_SBC/NEMO/OPA_SRC/TRA/traadv_cen2.F90

    r811 r881  
    161161                  rnfmsk(ji,jj) * rnfmsk_z(jk),      &  ! near runoff mouths (& closed sea outflows) 
    162162                  upsmsk(ji,jj)                      &  ! some of some straits 
    163 #if defined key_ice_lim 
     163#if defined key_lim2 
    164164                  !                                     ! below ice covered area (if tn < "freezing"+0.1 ) 
    165165                  , MAX(  0., SIGN( 1., fzptn(ji,jj) + 0.1 - tn(ji,jj,jk) )  ) * tmask(ji,jj,jk)   & 
Note: See TracChangeset for help on using the changeset viewer.