module F = Format
module type Spec : sig ... end
module type S : sig ... end
module Make : functor (Spec : Spec) -> S with module Source = Spec.Source and module Sink = Spec.Sink