module Key: sig .. end
sig
end
type 'a t
'a
val create : string -> ('a -> Sexp.t) -> 'a t
string -> ('a -> Sexp.t) -> 'a t