From oo to func. Haskell.