a23118d357
This addresses the first part of issue #461 We still need support for tactic definitions
5 lines
174 B
Text
5 lines
174 B
Text
import logic
|
|
open tactic
|
|
|
|
theorem tst {A B : Prop} (H1 : A) (H2 : B) : ((fun x : Prop, x) A) ∧ B ∧ A
|
|
:= by apply and.intro; beta; assumption; apply and.intro; assumption
|