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

Changeset 13894


Ignore:
Timestamp:
2020-11-26T22:23:28+01:00 (4 years ago)
Author:
acc
Message:

Branch dev_r13787_OSMOSIS_IMMERSE. Correct two sign changes inadvertently made during port from 2019 branch. This assumes the original signs were correct and the comment was wrong. Still not reproducible though.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2020/dev_r13787_OSMOSIS_IMMERSE/src/OCE/ZDF/zdfosm.F90

    r13885 r13894  
    11781178        CALL lbc_lnk_multi( 'zdfosm', hbl, 'T', 1., dh, 'T', 1., hmle, 'T', 1. ) 
    11791179        ! Lateral boundary conditions on final outputs for gham[ts],  on W-grid  (sign unchanged) 
    1180         ! Lateral boundary conditions on final outputs for gham[uv],  on [UV]-grid  (sign unchanged) 
    1181         CALL lbc_lnk_multi( 'zdfosm', ghamt, 'W', 1.0_wp , ghams, 'W', 1.0_wp,   & 
    1182          &                  ghamu, 'U', 1.0_wp , ghamv, 'V', 1.0_wp ) 
     1180        ! Lateral boundary conditions on final outputs for gham[uv],  on [UV]-grid  (sign changed) 
     1181        CALL lbc_lnk_multi( 'zdfosm', ghamt, 'W',  1.0_wp , ghams, 'W', 1.0_wp,   & 
     1182         &                            ghamu, 'U', -1.0_wp , ghamv, 'V', -1.0_wp ) 
    11831183 
    11841184      IF(ln_dia_osm) THEN 
Note: See TracChangeset for help on using the changeset viewer.