inductive pnat.pnat : Type₁ constructors: pnat.pnat.pos : Π (n : ℕ), nat.gt n (nat.of_num 0) → ℕ+ inductive prod : Type → Type → Type constructors: prod.mk : Π {A : Type} {B : Type}, A → B → A × B