2014-08-25 02:58:48 +00:00
|
|
|
import logic
|
2014-09-03 23:00:38 +00:00
|
|
|
open tactic
|
2014-06-29 18:39:05 +00:00
|
|
|
|
2014-07-22 16:43:18 +00:00
|
|
|
theorem tst {A B : Prop} (H1 : A) (H2 : B) : A
|
2015-04-06 16:24:09 +00:00
|
|
|
:= by (trace "first"; state; now |
|
2014-07-04 17:10:05 +00:00
|
|
|
trace "second"; state; fail |
|
2015-04-06 16:24:09 +00:00
|
|
|
trace "third"; assumption)
|
2014-07-02 03:43:53 +00:00
|
|
|
|
2014-09-03 23:00:38 +00:00
|
|
|
check tst
|