Module CamlinternalMenhirLib.RowDisplacement

module RowDisplacement: sig .. end

type 'a table = int array * 'a array 

val compress : ('a -> 'a -> bool) ->
       ('a -> bool) ->
       'a ->
       int ->
       int -> 'a array array -> 'a table

val get : 'a table -> int -> int -> 'a

val getget : ('displacement -> int -> int) ->
       ('data -> int -> 'a) -> 'displacement * 'data -> int -> int -> 'a