sig
  val self : Project.t
  val select :
    Kind.how ->
    Project.Computation.selection -> Project.Computation.selection
  val depend : Project.t -> unit
  val name : string
end