[ghc-hetmet.git] / ghc / tests / ghci / prog001 / D1.hs

module D where

data T = A Int | B Float deriving Eq

f x = x + x