lean2/tests/lean/run/tactic10.lean

import logic

theorem tst (a b : Prop) (H : a ↔ b) : b ↔ a
:= by apply iff.intro;
      intro Hb;
        apply (iff.elim_right H Hb);
      intro Ha;
        apply (iff.elim_left H Ha)

check tst
chore(*): minimize dependencies on tests Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-08-25 02:58:48 +00:00			`import logic`
feat(frontends/lean): add exact_apply Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-06-30 07:51:11 +00:00
refactor(*): rename Bool to Prop Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-22 16:43:18 +00:00			`theorem tst (a b : Prop) (H : a ↔ b) : b ↔ a`
feat(library,hott): remove rapply tactic 2015-04-27 22:06:16 +00:00			`:= by apply iff.intro;`
feat(library/tactic/apply_tactic): modify heuristic for adding arguments to apply tactic. 2014-10-24 05:36:32 +00:00			`intro Hb;`
feat(library,hott): remove rapply tactic 2015-04-27 22:06:16 +00:00			`apply (iff.elim_right H Hb);`
			`intro Ha;`
			`apply (iff.elim_left H Ha)`
feat(library/tactic): new apply tactic Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-02 20:14:50 +00:00
			`check tst`