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