I would like to prove that calling
DeleteTodo : ∀ {n} → (Vec Todo n) → ℕ → (Vec Todo n) DeleteTodo todos id\' = padRight record { id = 1 --