Haskell programlama dilinde yaz?lm?? bu fonksiyonda kullan?c?dan al?nan bir liste içinde kullan?c? al?nacak bir eleman aranmaktad?r.Bu fonksiyonda zipir isimli ba?ka bir fonksiyon daha kullan?lm??t?r, sonuç olarak kullan?c?n?n aranmas?n? istedi?i eleman?n liste içerisinde bulundu?u konumlar bir liste ?eklinde geri döndürülür. Listeler de diziler gibi 0'dan ba?lamaktad?r.

Program Kodu :

 
pozisyon :: (Eq a , Ord a) => a -> [a] -> [Int]
pozisyon x xs = [ s |(s,y) <- zipir [0..] xs , x==y]
 
zipir :: [a] -> [b] -> [(a,b)]
zipir  _ [] = []
zipir [] _  = []
zipir (x:xs) (y:ys) = [(x,y)] ++ zip xs ys