Documentation

Lean.Util.Recognizers

@[inline]

def Lean.Expr.const? (e : Lean.Expr) :

Option (Lake.Name × List Lean.Level)

Equations

Lean.Expr.const? e = match e with | Lean.Expr.const n us => some (n, us) | x => none

Instances For

@[inline]

def Lean.Expr.app1? (e : Lean.Expr) (fName : Lake.Name) :

Option Lean.Expr

Equations

Lean.Expr.app1? e fName = if Lean.Expr.isAppOfArity e fName 1 = true then some (Lean.Expr.appArg! e) else none

Instances For

@[inline]

def Lean.Expr.app2? (e : Lean.Expr) (fName : Lake.Name) :

Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.app2? e fName = if Lean.Expr.isAppOfArity e fName 2 = true then some (Lean.Expr.appArg! (Lean.Expr.appFn! e), Lean.Expr.appArg! e) else none

Instances For

@[inline]

def Lean.Expr.app3? (e : Lean.Expr) (fName : Lake.Name) :

Option (Lean.Expr × Lean.Expr × Lean.Expr)

Equations

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

Instances For

@[inline]

def Lean.Expr.app4? (e : Lean.Expr) (fName : Lake.Name) :

Option (Lean.Expr × Lean.Expr × Lean.Expr × Lean.Expr)

Equations

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

Instances For

@[inline]

def Lean.Expr.eq? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr × Lean.Expr)

Equations

Lean.Expr.eq? p = Lean.Expr.app3? p `Eq

Instances For

@[inline]

def Lean.Expr.ne? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr × Lean.Expr)

Equations

Lean.Expr.ne? p = Lean.Expr.app3? p `Ne

Instances For

@[inline]

def Lean.Expr.iff? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.iff? p = Lean.Expr.app2? p `Iff

Instances For

@[inline]

def Lean.Expr.eqOrIff? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.eqOrIff? p = match Lean.Expr.app3? p `Eq with | some (fst, lhs, rhs) => some (lhs, rhs) | x => Lean.Expr.iff? p

Instances For

@[inline]

def Lean.Expr.not? (p : Lean.Expr) :

Option Lean.Expr

Equations

Lean.Expr.not? p = Lean.Expr.app1? p `Not

Instances For

@[inline]

def Lean.Expr.notNot? (p : Lean.Expr) :

Option Lean.Expr

Equations

Lean.Expr.notNot? p = match Lean.Expr.not? p with | some p => Lean.Expr.not? p | none => none

Instances For

@[inline]

def Lean.Expr.and? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.and? p = Lean.Expr.app2? p `And

Instances For

@[inline]

def Lean.Expr.heq? (p : Lean.Expr) :

Option (Lean.Expr × Lean.Expr × Lean.Expr × Lean.Expr)

Equations

Lean.Expr.heq? p = Lean.Expr.app4? p `HEq

Instances For

def Lean.Expr.natAdd? (e : Lean.Expr) :

Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.natAdd? e = Lean.Expr.app2? e `Nat.add

Instances For

@[inline]

def Lean.Expr.arrow? :

Lean.Expr → Option (Lean.Expr × Lean.Expr)

Equations

Lean.Expr.arrow? x = match x with | Lean.Expr.forallE binderName α β binderInfo => if Lean.Expr.hasLooseBVars β = true then none else some (α, β) | x => none

Instances For

def Lean.Expr.isEq (e : Lean.Expr) :

Equations

Lean.Expr.isEq e = Lean.Expr.isAppOfArity e `Eq 3

Instances For

def Lean.Expr.isHEq (e : Lean.Expr) :

Equations

Lean.Expr.isHEq e = Lean.Expr.isAppOfArity e `HEq 4

Instances For

def Lean.Expr.isIte (e : Lean.Expr) :

Equations

Lean.Expr.isIte e = Lean.Expr.isAppOfArity e `ite 5

Instances For

def Lean.Expr.isDIte (e : Lean.Expr) :

Equations

Lean.Expr.isDIte e = Lean.Expr.isAppOfArity e `dite 5

Instances For

def Lean.Expr.listLit? (e : Lean.Expr) :

Option (Lean.Expr × List Lean.Expr)

Equations

Lean.Expr.listLit? e = Lean.Expr.listLit?.loop e []

Instances For

partial def Lean.Expr.listLit?.loop (e : Lean.Expr) (acc : List Lean.Expr) :

Option (Lean.Expr × List Lean.Expr)

def Lean.Expr.arrayLit? (e : Lean.Expr) :

Option (Lean.Expr × List Lean.Expr)

Equations

Lean.Expr.arrayLit? e = if Lean.Expr.isAppOfArity' e `List.toArray 2 = true then Lean.Expr.listLit? (Lean.Expr.appArg!' e) else none

Instances For

def Lean.Expr.prod? (e : Lean.Expr) :

Option (Lean.Expr × Lean.Expr)

Recognize α × β

Equations

Lean.Expr.prod? e = Lean.Expr.app2? e `Prod

Instances For