1 2 3 4 5 6 7 8 9
{-# LANGUAGE Haskell2010 #-} data Container = Container [Wibble Int] deriving (Eq, Show) data Wibble a = Wibble a | Wobble deriving (Eq, Functor, Show)