[Haskell-beginners] find problem