lean2/tests/lean/lua14.lean

22 lines
392 B
Text
Raw Normal View History

Variables x y z : Int
Variable f : Int -> Int -> Int
(**
local t = parse_lean("fun w, f w (f y 0)")
print(t)
assert(t:closed())
local n, d, b = t:fields()
print(b)
assert(not b:closed())
local env = get_environment()
assert(env:find_object("Int"):get_name() == name("Int"))
parse_lean_cmds([[
Eval 10 + 20
Check x + y
Variable g : Int -> Int
]])
**)
Check g (f x 10)