V2.For_testing
type target
val tag_variants : (string * int) list
val bin_rep_variants : (string * int) list
val to_binable : t -> target
val of_binable : target -> t