funext b
case e_fγ.h.e_a.e_snd
α : Type u_1
β : α → Type u_2
inst✝⁵ : Primcodable α
inst✝⁴ : (a : α) → Fintype (β a)
inst✝³ : (a : α) → DecidableEq (β a)
inst✝² : (a : α) → Primcodable (β a)
inst✝¹ : PrimrecCard β
γ : Type u_3
w : WType fun a => β a
inst✝ : Inhabited γ
f : (a : α) × (β a → γ) → γ
a : α
j : β a → γ
⊢ j = fintypeArrowEquivFinArrow.symm fun i => j (fintypeEquivFin.symm i)
case e_fγ.h.e_a.e_snd.h
α : Type u_1
β : α → Type u_2
inst✝⁵ : Primcodable α
inst✝⁴ : (a : α) → Fintype (β a)
inst✝³ : (a : α) → DecidableEq (β a)
inst✝² : (a : α) → Primcodable (β a)
inst✝¹ : PrimrecCard β
γ : Type u_3
w : WType fun a => β a
inst✝ : Inhabited γ
f : (a : α) × (β a → γ) → γ
a : α
j : β a → γ
b : β a
⊢ j b = fintypeArrowEquivFinArrow.symm (fun i => j (fintypeEquivFin.symm i)) b