McCarthy91

From HaskellWiki
mccarthy91 n = 
    if n <= 100
    then (mccarthy91.mccarthy91.(+11)) n 
    else n - 10

or with guards:

mccarthy91 n | n <= 100  = mccarthy91 . mccarthy91 . (+11) $ n
             | otherwise = n - 10