# Module Tbl

    module Tbl: sig .. end

    type ('k, 'v) t

    val empty : ('k, 'v) t

    val add : 'k -> 'v -> ('k, 'v) t -> ('k, 'v) t

    val find : 'k -> ('k, 'v) t -> 'v

    val find_str : string -> (string, 'v) t -> 'v

    val mem : 'k -> ('k, 'v) t -> bool

    val remove : 'k -> ('k, 'v) t -> ('k, 'v) t

    val iter : ('k -> 'v -> unit) -> ('k, 'v) t -> unit

    val map : ('k -> 'v1 -> 'v2) -> ('k, 'v1) t -> ('k, 'v2) t

    val fold : ('k -> 'v -> 'acc -> 'acc) -> ('k, 'v) t -> 'acc -> 'acc

    val print : (Format.formatter -> 'k -> unit) ->
           (Format.formatter -> 'v -> unit) ->
           Format.formatter -> ('k, 'v) t -> unit