module Tag_comp: sig .. end
sig
end
type t
val get_tag : t -> int
t -> int
val get_comp : t -> bool
t -> bool
val encode : int -> bool -> t
int -> bool -> t