{-# LANGUAGE DeriveDataTypeable #-}
data Foo = Foo Int deriving Data