3 lines
106 B
Haskell
3 lines
106 B
Haskell
|
dropEvery :: [a] -> Int -> [a]
|
||
|
|
dropEvery l n = map snd . filter ((0 /=) . (`mod` n) . fst) $ zip [1 ..] l
|