Module Make_no_zero.Array
type index = tval empty : 'a Array.tval singleton : 'a -> 'a Array.tval extend : 'a Array.t -> Array.index -> (Array.index -> 'a) -> 'a Array.tval retract : 'a Array.t -> Array.index -> 'a Array.tval contains : 'a Array.t -> Array.index -> boolval last : 'a Array.t -> Array.index optionval set : 'a Array.t -> Array.index -> 'a -> unitval get : 'a Array.t -> Array.index -> 'a