& SnowAccRateOverIce(I,J),
_RL SnowAccRateOverIce (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
SnowAccRateOverIce (I,J) = 0.0
SnowAccRateOverIce(I,J) =
SnowAccRateOverIce(I,J) = 0.0
& SnowAccRateOverIce(I,J)
& SnowAccRateOverIce(I,J) -