module Bug1004 (Product(..)) where import Data.Functor.Product