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 14417 for NEMO/branches/2021/dev_r14312_MPI_Interface/src/OCE/TRD – NEMO

Ignore:
Timestamp:
2021-02-08T11:48:23+01:00 (3 years ago)
Author:
smasson
Message:

dev_r14312_MPI_Interface: put back propper alignment, #2598

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2021/dev_r14312_MPI_Interface/src/OCE/TRD/trdmxl.F90

    r14338 r14417  
    473473         !         ... temperature ...                    ... salinity ... 
    474474         CALL lbc_lnk( 'trdmxl', ztmltot , 'T', 1.0_wp, zsmltot , 'T', 1.0_wp, & 
    475                   &          ztmlres , 'T', 1.0_wp, zsmlres , 'T', 1.0_wp, & 
    476                   &          ztmlatf , 'T', 1.0_wp, zsmlatf , 'T', 1.0_wp ) 
     475            &                    ztmlres , 'T', 1.0_wp, zsmlres , 'T', 1.0_wp, & 
     476            &                    ztmlatf , 'T', 1.0_wp, zsmlatf , 'T', 1.0_wp ) 
    477477 
    478478 
    … …  
    524524         !         ... temperature ...                    ... salinity ... 
    525525         CALL lbc_lnk( 'trdmxl', ztmltot2, 'T', 1.0_wp, zsmltot2, 'T', 1.0_wp, & 
    526                   &          ztmlres2, 'T', 1.0_wp, zsmlres2, 'T', 1.0_wp ) 
     526            &                    ztmlres2, 'T', 1.0_wp, zsmlres2, 'T', 1.0_wp ) 
    527527         ! 
    528528         CALL lbc_lnk( 'trdmxl', ztmltrd2(:,:,:), 'T', 1.0_wp, zsmltrd2(:,:,:), 'T', 1.0_wp ) ! /  in the NetCDF trends file 
Note: See TracChangeset for help on using the changeset viewer.