Handbook
Glossary
(strips-predictor) ( ifd -- ifd )
Vocabulary
images
.
tiff
Inputs
ifd
an
object
Outputs
ifd
an
object
Definition
USING:
accessors
arrays
grouping
kernel
math
math.vectors
sequences
;
IN:
images.tiff
:
(strips-predictor)
( ifd -- ifd )
[
]
[
image-width
find-tag
]
[
samples-per-pixel
find-tag
]
tri
[
*
]
keep
[
[
group
]
[
0
<array>
]
bi
[
v+
]
accumulate*
concat
]
curry
[
[
group
]
curry
]
dip
[
map
B{
}
concat-as
]
curry
compose
change-bitmap
;