fix: invalid proof
This commit is contained in:
parent
db38bc4043
commit
c9471ea029
1 changed files with 2 additions and 1 deletions
|
|
@ -204,7 +204,8 @@ class inductive Nonempty (α : Sort u) : Prop where
|
|||
axiom Classical.choice {α : Sort u} : Nonempty α → α
|
||||
|
||||
protected def Nonempty.elim {α : Sort u} {p : Prop} (h₁ : Nonempty α) (h₂ : α → p) : p :=
|
||||
h₂ h₁.1
|
||||
match h₁ with
|
||||
| intro a => h₂ a
|
||||
|
||||
instance {α : Sort u} [Inhabited α] : Nonempty α :=
|
||||
⟨default⟩
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue