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