max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore: upstream Thunk.ext (#4969)

Browse source
This commit is contained in:
Kim Morrison 2024-08-09 15:49:13 +10:00 • committed by GitHub
parent 6dd502321f
commit dd6ed124ba
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Init/Ext.lean
View file

@ -82,3 +82,6 @@ attribute [ext] funext propext Subtype.eq
@[ext] protected theorem PUnit.ext (x y : PUnit) : x = y := rfl
protected theorem Unit.ext (x y : Unit) : x = y := rfl
@[ext] protected theorem Thunk.ext : {a b : Thunk α} → a.get = b.get → a = b
| {..}, {..}, heq => congrArg _ <| funext fun _ => heq