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