_RL nbPnts, rNbPnts
nbPnts = 0.
CALL GLOBAL_SUM_TILE_RL( tileNbPt, nbPnts, myThid )
IF ( nbPnts.GT.zeroRL ) THEN
rNbPnts = 1. _d 0/nbPnts