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 5016 for trunk – NEMO

Changeset 5016 for trunk


Ignore:
Timestamp:
2015-01-08T15:18:01+01:00 (9 years ago)
Author:
timgraham
Message:

Fix for ticket #1423 so that S coordinate case for uslp and vslp is not called in Z coordinate model with VVL (e.g. ORCA2_LIM3 reference config)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/LDF/ldfslp.F90

    r4990 r5016  
    847847         wslpj(:,:,:) = 0._wp   ;   wslpjml(:,:) = 0._wp 
    848848 
    849          IF( ln_traldf_hor .OR. ln_dynldf_hor ) THEN 
     849         IF(ln_sco .AND.  (ln_traldf_hor .OR. ln_dynldf_hor )) THEN 
    850850            IF(lwp)   WRITE(numout,*) '          Horizontal mixing in s-coordinate: slope = slope of s-surfaces' 
    851851 
Note: See TracChangeset for help on using the changeset viewer.