1 2 3 4 5 6 7
-- !!! combining undeclared infix operators module ShouldCompile where -- should default to 'infixl 9' test = let f x y = x+y in 1 `f` 2 `f` 3