chore: add public modifiers in Lean.Elab.Tactic.Ext (#10809)

This PR restores further definitions to `public`, after #10699.
This commit is contained in:
Kim Morrison 2025-10-17 08:48:41 +11:00 committed by GitHub
parent 663df8f7e8
commit 127fe785a3
No known key found for this signature in database
GPG key ID: B5690EEEBB952194

View file

@ -178,8 +178,7 @@ def realizeExtIffTheorem (extName : Name) : Elab.Command.CommandElabM Name := do
### Attribute
-/
abbrev extExtension := Meta.Ext.extExtension
abbrev getExtTheorems := Meta.Ext.getExtTheorems
open Ext
builtin_initialize registerBuiltinAttribute {
name := `ext
@ -220,7 +219,8 @@ builtin_initialize registerBuiltinAttribute {
-/
/-- Apply a single extensionality theorem to `goal`. -/
def applyExtTheoremAt (goal : MVarId) : MetaM (List MVarId) := goal.withContext do
-- Tis is public for now as it is used internally in `aesop`.
public def applyExtTheoremAt (goal : MVarId) : MetaM (List MVarId) := goal.withContext do
let tgt ← goal.getType'
unless tgt.isAppOfArity ``Eq 3 do
throwError "This extensionality tactic only applies to equalities, not{indentExpr tgt}"