module Genimage:Low level image creatorsig
..end
module MakeRawImage:
module Make:functor (
RI
:
Image_intf.RAWIMAGE
) ->
functor (
CON
:
CONTAINER
with type rawimage = RI.t
) ->
IMAGE
with type t = CON.container and type elt = RI.elt
module MakeIndexed:functor (
RI
:
RAWIMAGE
with type elt = int
) ->
functor (
CON
:
CONTAINER_INDEXED
with type rawimage = RI.t
) ->
IMAGEINDEXED
with type t = CON.container and type elt = int and type mapelt = CON.mapelt