module ShouldFail where foo = let x = (1, 2 y = 3 in fst x + y