Data.Generics.Sum.HasConstructor

class HasConstructor con a s