Work_selector
module State : sig ... end
module type Selection_method_intf = sig ... end
module Selection_methods : sig ... end