ofTrue

Mathlib.Lean.Meta.Simp

URI: https://scilib.ai/kg/mathlib#Lean.Meta.Simp.Result.ofTrue

Lean4

/-- Constructs a proof that the original expression is true
given a simp result which simplifies the target to `True`.
-/
def ofTrue (r : Simp.Result) : MetaM (Option Expr) :=
  if r.expr.isConstOf ``True then
    some <$>
      match r.proof? with
      | some proof => mkOfEqTrue proof
      | none => pure (mkConst ``True.intro)
  else pure none

Похожие утверждения

Научная платформа российской исследовательской школы.

Разделы

MathLib Explorer
Graph RAG
Лаборатория
Блог
О проекте
Команда

Аффилиация

Вычислительный центр им. А. А. Дороницына при ФИЦ «Информатика и Управление» РАН frccsc.ru