5 lines
181 B
Text
5 lines
181 B
Text
definition pnat.pnat : Type₁ :=
|
||
{ (n : ℕ)| nat.gt n (nat.of_num 0)}
|
||
inductive prod : Type → Type → Type
|
||
constructors:
|
||
prod.mk : Π {A : Type} {B : Type}, A → B → A × B
|