Module Univ_map.With_fold.Key

module Key: sig .. end

type ('a, 'b) t 

val create : init:'b ->
       f:('b -> 'a -> 'b) ->
       string -> ('b -> Sexp.t) -> ('a, 'b) t