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