evalNegPart

Mathlib.Tactic.Positivity.Basic

URI: https://scilib.ai/kg/mathlib#Mathlib.Meta.Positivity.evalNegPart

Lean4

/-- Extension for `negPart`. `a⁻` is always nonnegative. -/
@[positivity _⁻]
def evalNegPart : PositivityExt where
  eval {u α} _ _
    e := do
    match e with
    | ~q(@negPart _ $instαnegpart $a) =>
      let _instαlat ← synthInstanceQ q(Lattice $α)
      let _instαgrp ← synthInstanceQ q(AddGroup $α)
      assertInstancesCommute
      return .nonnegative q(negPart_nonneg $a)
    | _ =>
      throwError"not `negPart`"

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

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

Разделы

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

Аффилиация

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