sterGloH=VOLsumGlob_0/globalArea
sterGloH=0. _d 0
& +sterGloH
Real*8 sterGloH
& ' iter=', myiter, ' ; sterGloH= ', sterGloH
& + sterGloH * gravity
& sterGloH,
_RL sterGloH