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 2163 for branches/DEV_r1924_nocs_latphys/NEMO/OPA_SRC/LDF/ldftra.F90 – NEMO

Ignore:
Timestamp:
2010-10-06T11:30:20+02:00 (14 years ago)
Author:
sga
Message:

NEMO branch DEV_r1924_nocs_latphys. George Nurser

Included code in ldfslp.F90 to limit slopes to slpmax and
linearly decrease slopes towards surface throughout the mixed layer

Corrected minor bug for wslp2 in ldfslp.F90
Introduced rn_slpmax into namelist

Calculate streamfunctions psix_eiv,psiy_eiv

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/DEV_r1924_nocs_latphys/NEMO/OPA_SRC/LDF/ldftra.F90

    r2079 r2163  
    6868         &                 ln_traldf_level, ln_traldf_hor  , ln_traldf_iso,   & 
    6969         &                 ln_traldf_vis,   ln_traldf_grif ,                  & 
    70          &                 rn_aht_0       , rn_ahtb_0      , rn_aeiv_0 
     70         &                 rn_aht_0       , rn_ahtb_0      , rn_aeiv_0,       & 
     71         &                 rn_slpmax 
    7172      !!---------------------------------------------------------------------- 
    7273 
     
    9293      ENDIF 
    9394 
     95      slpmax = rn_slpmax 
    9496      !                                ! convert DOCTOR namelist names into OLD names 
    9597      aht0  = rn_aht_0 
Note: See TracChangeset for help on using the changeset viewer.