haskell dict lookup version