Scientists find pocket of warm water trapped under Arctic with potential to melt entire ice pack