{-# LANGUAGE DeriveFunctor #-} 
data Foo = Foo Int deriving Functor