@@ -9,7 +9,7 @@ dupes (x:y:xs) = dupes(x:[y]) ++ dupes(y : xs)
10--Data.Vector.indexed but for lists
10--Data.Vector.indexed but for lists
11indexed :: [a] -> [(Int, a)]
11indexed :: [a] -> [(Int, a)]
12−indexed ls = go 0 ls
12+indexed = go 0
14 go _ [] = []
14 go _ [] = []
15− go i (v:ys) = (i,v):(go (i+1) ys)
15+ go i (v:ys) = (i,v):go (i+1) ys