lean2/tests/lua/env1.lua

local env = empty_environment()
assert(is_environment(env))
assert(not env:is_global_level("U"))
local env2 = env:add_global_level("U")
assert(not env:is_global_level("U"))
assert(env2:is_global_level("U"))
assert(env:eta())
assert(env:prop_proof_irrel())
assert(env:impredicative())
feat(library/kernel_bindings): add new global level methods to environment Lua API Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-05-07 23:17:04 +00:00			`local env = empty_environment()`
			`assert(is_environment(env))`
			`assert(not env:is_global_level("U"))`
			`local env2 = env:add_global_level("U")`
			`assert(not env:is_global_level("U"))`
			`assert(env2:is_global_level("U"))`
			`assert(env:eta())`
feat(kernel): add proof irrelevance for classes We can use this feature to implement proof irrelevance for Identity types. Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-05-16 22:04:34 +00:00			`assert(env:prop_proof_irrel())`
feat(library/kernel_bindings): add new global level methods to environment Lua API Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-05-07 23:17:04 +00:00			`assert(env:impredicative())`