Small_bit_vector.Unpackedtype var = Impl.Boolean.var listtype value = V.tval typ : ( var, value ) Impl.Typ.tval var_to_bits : var -> Impl.Boolean.var Bitstring_lib.Bitstring.Lsb_first.tval var_of_bits : Impl.Boolean.var Bitstring_lib.Bitstring.Lsb_first.t -> varval var_to_triples : var -> Impl.Boolean.var Tuple_lib.Triple.t list