[Haskell-beginners] reverse 'lookup'