lean2/tests/lua/tactic1.lua

local env = environment()
local A = Local("A", Type)
env = add_decl(env, mk_constant_assumption("eq", Pi(A, mk_arrow(A, A, Prop))))
local eq = Const("eq")
local a  = Local("a", A)
local b  = Local("b", A)
local H  = Local("H", eq(A, a, b))
local m  = mk_metavar("m", Pi(A, a, b, H, eq(A, a, b)))(A, a, b, H)
local s  = to_proof_state(m, eq(A, a, b))
test(tests/lua): add simple tactic framework test Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-06-28 01:51:55 +00:00			`local env = environment()`
			`local A = Local("A", Type)`
refactor(kernel): rename var_decl to constant_assumption Motivation: it matches the notation used to declare it. 2014-10-02 23:54:56 +00:00			`env = add_decl(env, mk_constant_assumption("eq", Pi(A, mk_arrow(A, A, Prop))))`
test(tests/lua): add simple tactic framework test Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-06-28 01:51:55 +00:00			`local eq = Const("eq")`
			`local a = Local("a", A)`
			`local b = Local("b", A)`
			`local H = Local("H", eq(A, a, b))`
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			`local m = mk_metavar("m", Pi(A, a, b, H, eq(A, a, b)))(A, a, b, H)`
			`local s = to_proof_state(m, eq(A, a, b))`