{-# ANN lam "HLint: ignore Redundant lambda" #-}
lam = \x -> x x x