def Lean.Meta.elimOptParam (type : Lean.Expr) : Lean.CoreM Lean.Expr

Equations

• One or more equations did not get rendered due to their size.

def Lean.Meta.occursOrInType (lctx : Lean.LocalContext) (e : Lean.Expr) (t : Lean.Expr) : Bool

Returns true if e occurs either in t, or in the type of a sub-expression of t. Consider the following example:

inductive Tyₛ : Type (u+1)
| SPi : (T : Type u) -> (T -> Tyₛ) -> Tyₛ

inductive Tmₛ.{u} :  Tyₛ.{u} -> Type (u+1)
| app : Tmₛ (.SPi T A) -> (arg : T) -> Tmₛ (A arg)```

When looking for fixed arguments in Tmₛ.app, if we only consider occurences in the term Tmₛ (A arg), T is considered non-fixed despite the fact that A : T -> Tyₛ. This leads to an ill-typed injectivity theorem signature:

theorem Tmₛ.app.inj {T : Type u} {A : T → Tyₛ} {a : Tmₛ (Tyₛ.SPi T A)} {arg : T} {T_1 : Type u} {a_1 : Tmₛ (Tyₛ.SPi T_1 A)} :
Tmₛ.app a arg = Tmₛ.app a_1 arg →
  T = T_1 ∧ HEq a a_1 := fun x => Tmₛ.noConfusion x fun T_eq A_eq a_eq arg_eq => eq_of_heq a_eq

Instead of checking the type of every subterm, we only need to check the type of free variables, since free variables introduced in the constructor may only appear in the type of other free variables introduced after them.

Equations

• Lean.Meta.occursOrInType lctx e t = (Lean.Expr.find? (Lean.Meta.occursOrInType.go lctx e) t).isSome

def Lean.Meta.occursOrInType.go (lctx : Lean.LocalContext) (e : Lean.Expr) (s : Lean.Expr) : Bool

Equations

• One or more equations did not get rendered due to their size.

def Lean.Meta.mkInjectiveTheoremNameFor (ctorName : Lake.Name) : Lake.Name

Equations

• Lean.Meta.mkInjectiveTheoremNameFor ctorName = ctorName ++ `inj

def Lean.Meta.mkInjectiveEqTheoremNameFor (ctorName : Lake.Name) : Lake.Name

Equations

• Lean.Meta.mkInjectiveEqTheoremNameFor ctorName = ctorName ++ `injEq

opaque Lean.Meta.genInjectivity : Lean.Option Bool

def Lean.Meta.mkInjectiveTheorems (declName : Lake.Name) : Lean.MetaM Unit

Equations

• One or more equations did not get rendered due to their size.