[Haskell-cafe] Currying function using values from array