compress ( byte-array -- compressed )


Vocabulary
tools.image.compression

Inputs
byte-arraya byte-array


Outputs
compresseda byte-array


Word description
Compresses bytes, keep shortest sequence

Definition
USING: kernel math sequences ;

IN: tools.image.compression

: compress ( byte-array -- compressed )
[ (compress) ] keep [ [ length ] bi@ < ] 2keep ? ;