no goals
α : Type u_1
β : Type u_2
γ : Type ?u.128087
δ : Type ?u.128090
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
x✝² : List α
x✝¹ : List β
x✝ : Forall₂ R x✝² x✝¹
⊢ Forall₂ R (take 0 x✝²) (take 0 x✝¹)
simp only [Forall₂.nil, take]
no goals
α : Type u_1
β : Type u_2
γ : Type ?u.128087
δ : Type ?u.128090
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
n✝ : ℕ
⊢ Forall₂ R (take (n✝ + 1) []) (take (n✝ + 1) [])
simp only [Forall₂.nil, take]
no goals
α : Type u_1
β : Type u_2
γ : Type ?u.128087
δ : Type ?u.128090
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
n : ℕ
a✝ : α
b✝ : β
l₁✝ : List α
l₂✝ : List β
h₁ : R a✝ b✝
h₂ : Forall₂ R l₁✝ l₂✝
⊢ Forall₂ R (take (n + 1) (a✝ :: l₁✝)) (take (n + 1) (b✝ :: l₂✝))
simp [And.intro h₁ h₂, forall₂_take n]