Skip to content

Instantly share code, notes, and snippets.

@minad
Created October 13, 2015 00:08
Show Gist options
  • Select an option

  • Save minad/1729b054fecd7a768491 to your computer and use it in GitHub Desktop.

Select an option

Save minad/1729b054fecd7a768491 to your computer and use it in GitHub Desktop.
typeof : {t:Type} -> t -> Type
typeof {t} _ = t
level : Nat -> Type
level Z = Nat
level (S n) = typeof (level n)
isThisTrue : level 1 = level 2
isThisTrue = refl
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment