lean2/tests/lua/env1.lua
Leonardo de Moura 5fe8c32da9 feat(kernel): use new universe contraints in the environment, allow new constraints to be added
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-06 16:46:11 -08:00

11 lines
283 B
Lua

import("util.lua")
e = environment()
assert(is_environment(e))
e:add_uvar_cnstr("M1")
print(e:get_uvar("M1"))
e:add_var("N", Type())
N, M = Consts("N M")
e:add_var("a", N)
x, a = Consts("x, a")
check_error(function() e:type_check(fun(x, M, a)) end)
print(e:type_check(fun(x, N, a)))