clean up of snow_melt.c