val compress : uncompressed:string -> int list
val decompress : compressed:int list -> string list