1{-# LANGUAGE GeneralizedNewtypeDeriving, DeriveDataTypeable #-}
2data Foo = Foo Int deriving Class