 software date-time photoshop exif-ifd sub-ifd inter-color-profile
 xmp iptc fill-order document-name page-number page-name
 x-position y-position host-computer copyright artist
-min-sample-value max-sample-value make model cell-width cell-length
+min-sample-value max-sample-value tiff-make tiff-model cell-width cell-length
 gray-response-unit gray-response-curve color-map threshholding
 image-description free-offsets free-byte-counts tile-width tile-length
 matteing data-type image-depth tile-depth


ERROR: no-tag class ;

: find-tag ( idf class -- tag )
    swap processed-tags>> ?at [ no-tag ] unless ;

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

: read-strips ( ifd -- ifd )

        { 281 [ max-sample-value ] }
        { 282 [ first x-resolution ] }
        { 283 [ first y-resolution ] }
        { 284 [ lookup-planar-configuration planar-configuration ] }
        { 285 [ page-name ] }
        { 286 [ x-position ] }
        { 287 [ y-position ] }
