1 2 3 4 5
{-# LANGUAGE PartialTypeSignatures #-} module WildcardInDeriving where data Foo a = Foo a deriving (_)