tag? ( ifd class -- tag )


Vocabulary
images.tiff

Inputs
ifdan object
classan object


Outputs
tagan object


Definition
USING: accessors assocs kernel ;

IN: images.tiff

: tag? ( ifd class -- tag ) swap processed-tags>> key? ;