find links haskell initial