9c608c3
1 2 3 4 5 6
slice :: [a] -> Int -> Int -> [a] slice (x:xs) n m | n > 1 = slice xs (n - 1) (m - 1) | m > 0 = x:slice xs 0 (m - 1) slice _ _ _ = []