90bfd84a07
In the standard library, we should use explicit universe variables for universe polymorphic definitions. Users that want to declare universe polymorphic definitions but do not want to provide universe level parameters should use Type _ or Type*
28 lines
543 B
Text
28 lines
543 B
Text
prelude
|
|
inductive nat : Type
|
|
| zero : nat
|
|
| succ : nat → nat
|
|
namespace nat end nat open nat
|
|
|
|
inductive list (A : Type*) : Type*
|
|
| nil {} : list
|
|
| cons : A → list → list
|
|
namespace list end list open list
|
|
|
|
check nil
|
|
check nil.{1}
|
|
check @nil.{1} nat
|
|
check @nil nat
|
|
|
|
check cons zero nil
|
|
|
|
inductive vector (A : Type*) : nat → Type*
|
|
| vnil {} : vector zero
|
|
| vcons : forall {n : nat}, A → vector n → vector (succ n)
|
|
namespace vector end vector open vector
|
|
|
|
check vcons zero vnil
|
|
constant n : nat
|
|
check vcons n vnil
|
|
|
|
check vector.rec
|