no goals
α : Type u_2
β✝ : Type ?u.28291
σ : Type u_3
inst✝² : Primcodable α
inst✝¹ : Primcodable β✝
inst✝ : Primcodable σ
β : Type u_1
e : β ≃ α
f : σ → α
this : Primcodable β := Primcodable.ofEquiv α e
h : Primrec fun a => ↑e.symm (f a)
a : σ
⊢ ↑e (↑e.symm (f a)) = f a
simp