Module Array.Invariant

type 'a t = 'a array
val imap : ('a -> 'b) -> ('b -> 'a) -> 'a t -> 'b t