_RL SaltPlumeCriterion, SPovershoot
COMMON /SALT_PLUME_PARAMS_R/ SaltPlumeCriterion, SPovershoot
& min( SaltPlumeDepth(i,j,bi,bj)*SPovershoot,
dd = dd20/SPovershoot
& SaltPlumeCriterion, SPovershoot
SPovershoot = 1.0 _d 0