_RL c1Mlt, c2Mlt, aMlt, hMlt
hMlt = hThinIce+c2Mlt/aMlt
hMlt = hThickIce
xxMlt = aMlt*(hIce(i,j)-hMlt)