Data.Function.Selector
data Selector s a
class Comp1 s a
class Comp2 s a
class Comp3 s a