2015-06-16 18:33:26 +00:00
|
|
|
|
inductive pnat.pnat : Type₁
|
2015-05-27 05:19:42 +00:00
|
|
|
|
constructors:
|
2015-06-16 18:33:26 +00:00
|
|
|
|
pnat.pnat.pos : Π (n : ℕ), nat.gt n (nat.of_num 0) → ℕ+
|
2015-05-27 05:19:42 +00:00
|
|
|
|
structure prod : Type → Type → Type
|
|
|
|
|
|
fields:
|
|
|
|
|
|
prod.pr1 : Π {A : Type} {B : Type}, A × B → A
|
|
|
|
|
|
prod.pr2 : Π {A : Type} {B : Type}, A × B → B
|
