val read_names : unit -> Base.string Base.list
val bigrams : Base.String.t -> (Base.String.elt * Base.String.elt) Base.List.t
val get_all_bigrams : unit -> (Base.String.elt * Base.String.elt) Base.List.t
val letters : Base.Char.t Base.List.t
val letters_with_dot : Base.Char.t list
val char_to_index_tbl : (Base.Char.t, int) Base.Hashtbl.t
val char_index : Base.Char.t Base.Hashtbl.key -> int
val bigrams_to_indices :
(Base.Char.t Base.Hashtbl.key * Base.Char.t Base.Hashtbl.key) Base.List.t ->
(int * int) Base.List.t
val char_to_one_hot : Base.Char.t Base.Hashtbl.key -> float Base.Array.t