33cb9382aa
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
4 lines
155 B
Text
4 lines
155 B
Text
import logic
|
|
|
|
theorem tst {A B : Bool} (H1 : A) (H2 : B) : ((fun x : Bool, x) A) ∧ B ∧ A
|
|
:= by (apply and_intro, beta, exact, apply and_intro, !exact)
|