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

Changeset 9101


Ignore:
Timestamp:
2017-12-15T18:49:30+01:00 (6 years ago)
Author:
cetlod
Message:

Bugfix in trdmxl

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/TRD/trdmxl.F90

    r9100 r9101  
    532532         CALL lbc_lnk_multi( ztmltot2, 'T', 1., zsmltot2, 'T', 1., & 
    533533                  &          ztmlres2, 'T', 1., zsmlres2, 'T', 1. ) 
    534          DO jl = 1, jpltrd 
    535             CALL lbc_lnk_multi( ztmltrd2(:,:,jl), 'T', zsmltrd2(:,:,jl), 'T', 1. ) ! /  in the NetCDF trends file 
    536          END DO 
     534         ! 
     535         CALL lbc_lnk_multi( ztmltrd2(:,:,:), 'T', 1., zsmltrd2(:,:,:), 'T', 1. ) ! /  in the NetCDF trends file 
    537536          
    538537         ! III.3 Time evolution array swap 
Note: See TracChangeset for help on using the changeset viewer.