34 lines
510 B
Text
34 lines
510 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
|