Private.Sort
module type Sort = sig ... end
module Insertion_sort : Sort
module Heap_sort : Sort
module Intro_sort : sig ... end