main :: Integer main = match "Bar" with "Foo" -> 1 "Bar" -> 2 _ -> 3 -- 2