lean2/tests/lean/run/tactic5.lean

import standard

definition id {A : Type} (a : A) := a

theorem tst {A B : Bool} (H1 : A) (H2 : B) : id A
:= by !(unfold_tac @id; state_tac); exact_tac

check tst
feat(frontends/lean): remove build_tactic_cmds, and use expressions for representing tactics Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-02 03:43:53 +00:00			`import standard`
feat(frontends/lean): add repeat tactic command, refactor tactic sequence notation Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-06-29 19:24:13 +00:00
			`definition id {A : Type} (a : A) := a`

			`theorem tst {A B : Bool} (H1 : A) (H2 : B) : id A`
feat(frontends/lean): remove build_tactic_cmds, and use expressions for representing tactics Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-02 03:43:53 +00:00			`:= by !(unfold_tac @id; state_tac); exact_tac`

			`check tst`