rC4kp = highFac(i,j)*(rCenter-ABS(rCenter))*mskP
& - ( (rCenter-rUpwind) + rC4kp )
& + rC4kp
& + ( (rCenter-rUpwind) + rC4kp )
& - rC4kp
_RL rC4km, rC4kp
rC4kp = rC4kp2D (i,j)
rC4kp = oneSixth*rCenter*mskP
rC4kp = rHigh * (rCenter-ABS(rCenter))*mskP
rC4kp = oneSixth*(rCenter-ABS(rCenter))*mskP
_RL rC4km, rC4kp, rHigh