Module Private.Io

module type S = sig ... end
module Extend (S : S) : sig ... end