newtype Foo = Foo Int deriving Data