lean2/tests/lean/lua13.lean
Leonardo de Moura ce1213a020 feat(frontends/lean): use '(* ... *)' instead of '(** ... **)' for script code blocks
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-05 10:32:47 -08:00

14 lines
297 B
Text

Import Int.
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"))
*)