cleanup
remove :: Int -> [a] -> [a]
Deal with negative index
remove :: Int -> [a] -> ([a], Maybe[a])