compress-factor-image ( image-file compressed-file -- )

Vocabulary

tools.image.compressor

Inputs

image-file	a string
compressed-file	a string

Outputs

None

Word description

Load, compresses and saves a Factor image

Definition

USING: io.files.unique kernel namespaces tools.image
tools.image.compression ;

IN: tools.image.compressor

: compress-factor-image ( image-file compressed-file -- )
    [
        load-factor-image force-compression get
        [ >compressable ] when compress-image
    ] dip [ save-factor-image ] with safe-overwrite-file ;