class type ['a] pset = object .. end
['a]
object
end
method add : 'a -> 'a pset
'a -> 'a pset
method mem : 'a -> bool
'a -> bool