7 lines
234 B
Text
7 lines
234 B
Text
|
||
namespace Option
|
||
|
||
theorem eq_some_iff_get_eq' {o : Option α} {a : α} :
|
||
o = some a ↔ ∃ h : o.isSome, Option.get _ h = a := by
|
||
cases o; simp only [isSome_none, false_iff]; intro h; cases h; contradiction
|
||
simp [exists_prop]
|