Skip to content

Instantly share code, notes, and snippets.

@useronym
Created September 6, 2016 13:16
Show Gist options
  • Save useronym/4716bb00b6d036569eba009b1859a374 to your computer and use it in GitHub Desktop.
Save useronym/4716bb00b6d036569eba009b1859a374 to your computer and use it in GitHub Desktop.
data _⊢_ : Cx → Form → Set where
ID : ∀ {Γ A} → A ∈ Γ
→ Γ ⊢ A
MP : ∀ {Γ A B} → Γ ⊢ A ⇒ B → Γ ⊢ A
→ Γ ⊢ B
AB : ∀ {Γ A B C} → Γ ⊢ (B ⇒ C) ⇒ (A ⇒ B) ⇒ (A ⇒ C)
AC : ∀ {Γ A B C} → Γ ⊢ (A ⇒ (B ⇒ C)) ⇒ B ⇒ (A ⇒ C)
AI : ∀ {Γ A} → Γ ⊢ A ⇒ A
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment