Module Setoid_test

module Setoid_test: sig .. end

module Uniq: 
functor (Setoid : Setoid.Setoid) -> sig .. end
module Person: sig .. end
module PersonUniq: Uniq(Person)
val crowd : Person.t list
val unique_members : Person.t list