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