1 2 3 4 5 6 7 8 9 10 11
-- !!! Duplicate fields in record decls module OK where data X = A {a :: Int} | B {a :: Int} f x = x -- data Y = V {a :: Int} -- f y = y