bf9f7560f7
(Type u) is the old (Type (u+1)) (PType u) is the old (Type u) Type* is the old (Type (_+1)) PType* is the old Type* The stdlib can be compiled, but we still have > 70 broken tests See discussion at #1341
14 lines
338 B
Text
14 lines
338 B
Text
prelude
|
|
inductive nat : Type
|
|
| zero : nat
|
|
| succ : nat → nat
|
|
namespace nat end nat open nat
|
|
|
|
inductive {u} vector (A : Type u) : nat → Type u
|
|
| vnil : vector zero
|
|
| vcons : Π {n : nat}, A → vector n → vector (succ n)
|
|
namespace vector end vector open vector
|
|
check vector.{1}
|
|
check vnil.{1}
|
|
check vcons.{1}
|
|
check vector.rec.{1 1}
|