exact this.of_eq <| by intro σ; ext; simp[←provable_iff_provableFn]
T : Theory ℒₒᵣ
inst✝⁴ : 𝐄𝐐 ≼ T
inst✝³ : 𝐏𝐀⁻ ≼ T
inst✝² : DecidablePred T
inst✝¹ : SigmaOneSound T
inst✝ : T.Computable
this : Partrec fun σ => Part.map (fun x => ()) (provableFn T (~[→ ⸢σ⸣].hom σ))
⊢ RePred fun σ => T ⊢! ~[→ ⸢σ⸣].hom σ
no goals