2013-12-25 20:27:56 +00:00
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
2014-01-06 03:10:21 +00:00
|
|
|
Imported 'macros'
|
2013-12-25 20:27:56 +00:00
|
|
|
Proved: T
|
2014-01-08 08:38:39 +00:00
|
|
|
theorem T (A : Type)
|
|
|
|
|
(p : A → Bool)
|
|
|
|
|
(f : A → A → A)
|
|
|
|
|
(x y z : A)
|
|
|
|
|
(H1 : p (f x x))
|
|
|
|
|
(H2 : x = y)
|
|
|
|
|
(H3 : x = z) : p (f y z) :=
|
|
|
|
|
subst (subst H1 H2) H3
|
