2013-12-01 21:56:38 +00:00
|
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
2014-01-01 21:52:25 +00:00
|
|
|
|
Imported 'Int'
|
2013-12-01 21:56:38 +00:00
|
|
|
|
Assumed: PlusComm
|
|
|
|
|
Assumed: a
|
2014-01-16 23:07:51 +00:00
|
|
|
|
funext (λ x : ℤ, PlusComm a x) : (λ x : ℤ, a + x) = (λ x : ℤ, x + a)
|
2013-12-01 21:56:38 +00:00
|
|
|
|
Set: lean::pp::implicit
|
2014-01-09 01:25:14 +00:00
|
|
|
|
@funext ℤ (λ x : ℤ, ℤ) (λ x : ℤ, a + x) (λ x : ℤ, x + a) (λ x : ℤ, PlusComm a x) :
|
2014-01-16 23:07:51 +00:00
|
|
|
|
@eq (∀ x : ℤ, (λ x : ℤ, ℤ) x) (λ x : ℤ, a + x) (λ x : ℤ, x + a)
|