[Template-haskell] Finding instances for a data type