Advertisement
VladNitu

W2L1(Lecture3)-FP24-Vlad-Batch1Q7-WL

Feb 18th, 2024
1,443
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. skips :: [a] -> [[a]]
  2. skips xs =
  3.   map generateSublist [1..length xs]
  4.     where
  5.       generateSublist i =
  6.         map fst (filter (\(x, id) -> id `mod` i == 0) (zip xs [1..length xs]))
  7.        
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement