Swiss residents are wrapping glaciers in blankets to keep them from melting