2014-10-27 17:12:25 -07:00
|
|
|
import logic
|
|
|
|
|
|
|
|
|
|
theorem tst1 (a b c : Prop) : a → b → a ∧ b :=
|
|
|
|
|
begin
|
|
|
|
|
intros,
|
|
|
|
|
apply and.intro,
|
2015-05-02 17:32:03 -07:00
|
|
|
repeat assumption
|
2014-10-27 17:12:25 -07:00
|
|
|
end
|
|
|
|
|
|
|
|
|
|
theorem tst2 (a b c : Prop) : a → b → a ∧ b :=
|
2015-05-02 17:32:03 -07:00
|
|
|
by intros; apply and.intro; repeat assumption
|
