Subtypes #
These are ported from the Lean 3 standard library file init/data/subtype/basic.lean
.
theorem
Subtype.tag_irrelevant
{α : Type u}
{p : α → Prop}
{a : α}
(h1 : p a)
(h2 : p a)
:
{ val := a, property := h1 } = { val := a, property := h2 }
If there is some element satisfying the predicate, then the subtype is inhabited.
Equations
- Subtype.inhabited h = { default := { val := a, property := h } }