Blankets on Swiss mountain help protect glacier