Stog library reference documentation : Stog_trie.S
sig
  type symbol
  type path = Stog_trie.S.symbol list
  type 'a t
  exception Already_present of Stog_trie.S.path
  val empty : 'Stog_trie.S.t
  val add :
    ?fail:bool ->
    Stog_trie.S.path -> '-> 'Stog_trie.S.t -> 'Stog_trie.S.t
  val find : Stog_trie.S.path -> 'Stog_trie.S.t -> 'a list
  val to_string :
    (Stog_trie.S.symbol -> string) -> 'Stog_trie.S.t -> string
end