2014-01-03 00:31:52 +00:00
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
|
|
|
|
Set: lean::pp::implicit
|
|
|
|
|
Set: pp::colors
|
|
|
|
|
Assumed: N
|
|
|
|
|
Defined: T
|
2014-01-16 23:07:51 +00:00
|
|
|
definition T (a : N) (f : N → N) (H : @eq N (f a) a) : @eq N (f (f a)) (f (f a)) :=
|
|
|
|
|
@substp N (f a) a (λ x : N, @eq N (f (f a)) (f (f a))) (@refl N (f (f a))) H
|
