lean2/tests/lean/t4.lean

60 lines
1.2 KiB
Text
Raw Normal View History

definition [inline] Bool : Type.{1} := Type.{0}
variable N : Type.{1}
check N
variable a : N
check a
check Bool → Bool
variable F.{l} : Type.{l} → Type.{l}
check F.{2}
universe u
check F.{u}
variable vec.{l} (A : Type.{l}) (n : N) : Type.{l}
variable f (a b : N) : N
variable len.{l} (A : Type.{l}) (n : N) (v : vec.{l} A n) : N
check f
check len.{1}
section
variable A : Type
variable B : Bool
hypothesis H : B
{parameter} C : Type
check B -> B
check A → A
check C
end
check A -- Error: A is part of the section
variable R : Type → Type
check R.{1 0}
check fun x y : N, x
namespace tst
variable N : Type.{2}
variable M : Type.{2}
print raw N -- Two possible interpretations N and tst.N
print raw tst.N -- Only one interpretation
end
print raw N -- Only one interpretation
namespace foo
variable M : Type.{3}
print raw M -- Only one interpretation
end
check tst.M
check foo.M
namespace foo
check M
end
check M -- Error
print "ok"
(*
local env = get_env()
print("Declarations:")
env:for_each_decl(function(d) print(d:name()) end)
print("-------------")
*)
universe l_1
variable T1 : Type -- T1 parameter is going to be called l_2