evalFintypeCard

Mathlib.Tactic.Positivity.Finset

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

Lean4

/-- Extension for `Fintype.card`. `Fintype.card α` is positive if `α` is nonempty. -/
@[positivity Fintype.card _]
def evalFintypeCard : PositivityExt where
  eval {u α} _ _
    e := do
    match u, α, e with
    | 0, ~q(ℕ), ~q(@Fintype.card $β $instβ) =>
      let instβno ← synthInstanceQ q(Nonempty $β)
      assumeInstancesCommute
      return .positive q(@Fintype.card_pos $β $instβ $instβno)
    | _ =>
      throwError"not Fintype.card"

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

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

Разделы

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

Аффилиация

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