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