VOLsumGlob_0=VOLsumGlob
& VOLsumGlob,
_RL VOLsumGlob_0, VOLsumGlob, RHOsumGlob_0, RHOsumGlob
VOLsumGlob=0. _d 0
CALL GLOBAL_SUM_TILE_RL( VOLsumTile, VOLsumGlob, myThid )
RHOsumGlob=RHOsumGlob/VOLsumGlob