Agregada la funcion compress-sequence