69e72c278d
We can use this feature to implement proof irrelevance for Identity types. Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
9 lines
284 B
Lua
9 lines
284 B
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())
|