case nil
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
⊢ [] = []
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
l : List α
H : Forall₂ R l []
⊢ l = []
cases H
no goals
case nil
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
⊢ [] = []
rfl
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
⊢ Forall₂ R [] []
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
l : List α
⊢ l = [] → Forall₂ R l []
rintro rfl
no goals
α : Type u_1
β : Type u_2
γ : Type ?u.15064
δ : Type ?u.15067
R S : α → β → Prop
P : γ → δ → Prop
Rₐ : α → α → Prop
⊢ Forall₂ R [] []
exact Forall₂.nil