evalDist

Mathlib.Topology.MetricSpace.Pseudo.Defs

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

Lean4

/-- Extension for the `positivity` tactic: distances are nonnegative. -/
@[positivity Dist.dist _ _]
def evalDist : PositivityExt where
  eval {u α} _zα _pα
    e := do
    match u, α, e with
    | 0, ~q(ℝ), ~q(@Dist.dist $β $inst $a $b) =>
      let _inst ← synthInstanceQ q(PseudoMetricSpace $β)
      assertInstancesCommute
      pure (.nonnegative q(dist_nonneg))
    | _, _, _ =>
      throwError"not dist"

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

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

Разделы

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

Аффилиация

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