2014-05-21 18:24:24 +00:00
|
|
|
local env = bare_environment()
|
2014-10-02 23:54:56 +00:00
|
|
|
env = add_decl(env, mk_constant_assumption("A", Prop))
|
2014-05-09 01:50:24 +00:00
|
|
|
local c1 = type_check(env, mk_axiom("p", Const("A")))
|
|
|
|
local c2 = type_check(env, mk_axiom("q", Const("A")))
|
|
|
|
env = env:add(c1)
|
|
|
|
env = env:add(c2)
|