1{-# LANGUAGE OverloadedLabels #-}
2
3( #. ) :: Int -> Int -> Int
4x #. y = x + y
5
6infixr 9 #.
7