no goals
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
n : ℕ
x✝ : List α
⊢ drop 0 (take (0 + n) x✝) = take n (drop 0 x✝)
simp
no goals
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
m n : ℕ
⊢ drop (m + 1) (take (m + 1 + n) []) = take n (drop (m + 1) [])
simp
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
m n : ℕ
head✝ : α
l : List α
h : m + 1 + n = m + n + 1
⊢ drop (m + 1) (take (m + 1 + n) (head✝ :: l)) = take n (drop (m + 1) (head✝ :: l))
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
m n : ℕ
head✝ : α
l : List α
⊢ drop (m + 1) (take (m + 1 + n) (head✝ :: l)) = take n (drop (m + 1) (head✝ :: l))
have h : m + 1 + n = m + n + 1 := by ac_rfl
no goals
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
m n : ℕ
head✝ : α
l : List α
h : m + 1 + n = m + n + 1
⊢ drop (m + 1) (take (m + 1 + n) (head✝ :: l)) = take n (drop (m + 1) (head✝ :: l))
simpa [take_cons, h] using drop_take m n l
no goals
ι : Type ?u.217889
α : Type u
β : Type v
γ : Type w
δ : Type x
l₁ l₂ : List α
m n : ℕ
head✝ : α
l : List α
⊢ m + 1 + n = m + n + 1
ac_rfl