Data.Function.Selector
data Selector s a
chgS
chgM
mkSelector
idS
(.&&&.)
class Comp1 s a
class Comp2 s a
class Comp3 s a