Up
module
PackedIntArray
:
sig
#
type
t = int * string
#
val
pack : int array
->
t
#
val
get :
t
->
int
->
int
#
val
get1 : string
->
int
->
int
end