Melting glacier destroys village in Swiss Alps