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