functor (M : Stringable.S) -> sig val t_of_sexp : Sexplib.Sexp.t -> M.t val sexp_of_t : M.t -> Sexplib.Sexp.t end