El mejor algoritmo de compresión

La mejor compresión de un archivo binario se obtiene a partir de la función
 

compresor :: [Bool] -> Bool
compresor (True:xs) = compresor xs
compresor (False:xs) = compresor xs
compresor [] = False

Esta función comprime a espacio en O(1) en tiempo en O(n). Se puede mejorar colapsando el catamorfismo a
 

compresor _ = False

para obtener tiempo en O(1).

El mejor algoritmo de compresión no sirve de nada sin el peor algoritmo de descompresión.

Todos los algoritmos de descompresión aplicables están en el mejor caso en O(ℵ₀) en espacio y tiempo. Dichos algoritmos garantizan encontrar el mensaje original, pero no un resultado único, y la búsqueda corre por cuenta del usuario.