simp
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐏𝐀⁻
a✝ : ℕ
x✝ : Fin a✝ → ℕ
⊢ (Semiformula.Evalbm ℕ x✝) ⊤ → (Semiformula.Evalbm M fun x => ↑(x✝ x)) ⊤
no goals