Ignore:
Timestamp:
2018-12-19T22:54:16+01:00 (2 years ago)
Author:
smasson
Message:

trunk: merge back dev_r10164_HPC09_ESIWACE_PREP_MERGE@10424 into the trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/ICB/icblbc.F90

    r10068 r10425  
    551551            this => this%next 
    552552         ENDDO ! WHILE 
    553          CALL mpp_sum(i) 
     553         CALL mpp_sum('icblbc', i) 
    554554         IF( i .GT. 0 ) THEN 
    555555            WRITE( numicb,'(a,i4)') 'send_bergs_to_other_pes: # of bergs outside computational domain = ',i 
Note: See TracChangeset for help on using the changeset viewer.