updateCustom :: CustomStack a -> Int -> a -> Maybe (CustomStack a)
updateCustom Nil _ _ = Nothing
updateCustom :: CustomStack a -> Int -> a -> Maybe (CustomStack a)
updateCustom Nil _ _ = Nothing
updateCustom Nil _ _ = Nothing