- Timestamp:
- 2018-11-12T16:20:57+01:00 (6 years ago)
- Location:
- NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/OBS
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/OBS/obs_averg_h2d.F90
r10069 r10297 616 616 617 617 IF(lk_mpp) THEN 618 CALL mpp_min( ze1min )619 CALL mpp_min( ze2min )618 CALL mpp_min( 'obs_averg_h2d', ze1min ) 619 CALL mpp_min( 'obs_averg_h2d', ze2min ) 620 620 ENDIF 621 621 -
NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/OBS/obs_readmdt.F90
r10068 r10297 220 220 END DO 221 221 222 IF( lk_mpp) CALL mpp_sum( zeta1 )223 IF( lk_mpp) CALL mpp_sum( zeta2 )224 IF( lk_mpp) CALL mpp_sum( zarea )222 IF( lk_mpp) CALL mpp_sum( 'obs_readmdt', zeta1 ) 223 IF( lk_mpp) CALL mpp_sum( 'obs_readmdt', zeta2 ) 224 IF( lk_mpp) CALL mpp_sum( 'obs_readmdt', zarea ) 225 225 226 226 zcorr_mdt = zeta1 / zarea -
NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/OBS/obs_write.F90
r10068 r10297 592 592 593 593 CALL obs_mpp_sum_integer( inumgoodobs, inumgoodobsmpp ) 594 CALL mpp_sum( zsumx)595 CALL mpp_sum( zsumx2)594 CALL mpp_sum('obs_write', zsumx) 595 CALL mpp_sum('obs_write', zsumx2) 596 596 597 597 IF (lwp) THEN
Note: See TracChangeset
for help on using the changeset viewer.