(uncompress-strips) ( strips compression -- uncompressed-strips )


Vocabulary
images.tiff

Inputs
stripsan object
compressionan object


Outputs
uncompressed-stripsan object


Definition
USING: combinators compression.lzw sequences ;

IN: images.tiff

: (uncompress-strips)
( strips compression -- uncompressed-strips )
{
{ compression-none [ ] }
{ compression-lzw [ [ tiff-lzw-uncompress ] map ] }
[ unhandled-compression ]
} case ;