inductive Proof: Type \def
| lref: Nat \to Proof (* projection *)
- | parx: Nat \to Proof (* *)
+ | prin: Nat \to Proof (* pos rel inhabitant *)
| impw: Proof \to Proof (* weakening *)
| impr: Proof \to Proof (* right introduction *)
| impi: Proof \to Proof \to Proof \to Proof (* left introduction *)