lean2/tests/lean/run/tactic15.lean

import logic
open tactic

constant A : Type.{1}
constant f : A → A → A
open eq
theorem tst {a b c : A} (H1 : a = b) (H2 : b = c) : f a (f b b) = f b (f c c)
:= by apply (subst H1);
      trace "trying again... ";
      state;
      apply (subst H2);
      apply eq.refl
chore(*): minimize dependencies on tests Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-08-24 19:58:48 -07:00			`import logic`
feat(frontends/lean): rename 'using' command to 'open' Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-09-03 16:00:38 -07:00			`open tactic`
test(tests/lean/run): add 'apply subst' test Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-03 09:07:56 -07:00
refactor(frontends/lean): constant/axiom are top-level commands, parameter/variable/hypothesis/conjecture are section/context-level commands Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-10-02 16:20:52 -07:00			`constant A : Type.{1}`
			`constant f : A → A → A`
refactor(library): add 'eq' and 'ne' namespaces Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-09-04 18:41:06 -07:00			`open eq`
test(tests/lean/run): add 'apply subst' test Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-07-03 09:07:56 -07:00			`theorem tst {a b c : A} (H1 : a = b) (H2 : b = c) : f a (f b b) = f b (f c c)`
			`:= by apply (subst H1);`
			`trace "trying again... ";`
			`state;`
			`apply (subst H2);`
feat(frontends/lean/inductive_cmd): prefix introduction rules with the name of the inductive datatype Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-09-04 16:36:06 -07:00			`apply eq.refl`