2014-08-25 02:58:48 +00:00
|
|
|
import logic
|
2014-09-03 23:00:38 +00:00
|
|
|
open tactic
|
2014-07-03 19:59:48 +00:00
|
|
|
|
|
|
|
definition assump := eassumption
|
|
|
|
|
|
|
|
theorem tst {A : Type} {a b c : A} (H1 : a = b) (H2 : b = c) : a = c
|
2014-09-05 01:41:06 +00:00
|
|
|
:= by apply eq.trans; assump; assump
|