Advertisement
Guest User

wooow

a guest
Dec 18th, 2017
67
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.19 KB | None | 0 0
  1. everyNth :: Int -> [a] -> [a]
  2. everyNth n xs = map fst [x | x <- zip xs [1..length xs], (snd x) `mod` n == 0 ]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement