lean4-htt/old_tests/tests/lean/run/ns2.lean
2018-04-10 12:56:55 -07:00

34 lines
521 B
Text

definition foo.id {A : Type} (a : A) := a
constant foo.T : Type.{1}
#check foo.id
#check foo.T
inductive foo.v.I | unit : foo.v.I
#check foo.v.I
#check foo.v.I.unit
namespace foo
#check id
#check T
#check v.I
end foo
namespace bla
definition vvv.pr {A : Type} (a b : A) := a
#check vvv.pr
end bla
#check bla.vvv.pr
namespace bla
namespace vvv
#check pr
inductive my.empty : Type
end vvv
end bla
#check bla.vvv.my.empty
namespace foo.bla
structure vvv.xyz := mk
end foo.bla
#check foo.bla.vvv.xyz.mk