Ignore:
Timestamp:
2018-11-12T16:20:57+01:00 (23 months ago)
Author:
smasson
Message:

dev_r10164_HPC09_ESIWACE_PREP_MERGE: action 2a: add report calls of mppmin/max/sum, see #2133

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/TOP/trcrst.F90

    r10068 r10297  
    320320         zmax  = MAXVAL( trn(:,:,:,jn), mask= ((tmask*SPREAD(tmask_i,DIM=3,NCOPIES=jpk).NE.0.)) ) 
    321321         IF( lk_mpp ) THEN 
    322             CALL mpp_min( zmin )      ! min over the global domain 
    323             CALL mpp_max( zmax )      ! max over the global domain 
     322            CALL mpp_min( 'trcrst', zmin )      ! min over the global domain 
     323            CALL mpp_max( 'trcrst', zmax )      ! max over the global domain 
    324324         END IF 
    325325         zmean  = ztraf / areatot 
Note: See TracChangeset for help on using the changeset viewer.