prente uma funçao que faça o seguinte:

que recebe uma lista de algarismos com um indicativo, uma lista de listas de algarismos
representando n´umeros de telefone, e seleciona os n´umeros que cameçados com o indicativo
dado. Por exemplo:
indicativo "253" ["253116787","213448023","253119905"]
devolve ["253116787","253119905"].

alguem me pode dizer como defenir esta funçao?

cumps..

module Main where

indicativo :: [Char] -> [[Char]] ->[[Char]]
indicativo ls a = filter (aux ls) a

aux :: [Char]->[Char]-> Bool
aux [] _ = True
aux _ [] = False
aux (x:xs) (y:ys) |(x /= y) = False
|otherwise = aux xs ys