Changeset 3782


Ignore:
Timestamp:
2013-02-08T18:24:38+01:00 (8 years ago)
Author:
acc
Message:

Branch dev_MERGE_2012. #1043 correct sign of diagnostic diffusive transport

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2012/dev_MERGE_2012/NEMOGCM/NEMO/OPA_SRC/TRA/traldf_iso.F90

    r3294 r3782  
    219219         IF( cdtype == 'TRA' .AND. jn == jp_tem  ) THEN 
    220220            z2d(:,:) = 0._wp  
    221             zztmp = rau0 * rcp  
     221            ! note sign is reversed to give down-gradient diffusive transports (#1043) 
     222            zztmp = -1.0_wp * rau0 * rcp 
    222223            DO jk = 1, jpkm1 
    223224               DO jj = 2, jpjm1 
Note: See TracChangeset for help on using the changeset viewer.