Functor Fold_map.Make_sexpable

module Make_sexpable (Fold : Foldable_sexpable) : S_sexpable 
  with type in_value = Fold.data
  and type out_value = Fold.t

include Fold_map.S

include Sexpable.S1