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