slice :: Int -> Int -> [Int] -> [Int]
Refactor: simplify