Skip to content

Instantly share code, notes, and snippets.

@jroesch
Last active May 2, 2016 06:26
Show Gist options
  • Save jroesch/3ae9d497e001929c53f37d18345bce53 to your computer and use it in GitHub Desktop.
Save jroesch/3ae9d497e001929c53f37d18345bce53 to your computer and use it in GitHub Desktop.
check @nat.rec
constant C : nat -> Type
constant cZ : C nat.zero
constant cS : forall n, C n -> C (nat.succ n)
eval (@nat.rec C cZ cS nat.zero)
constant x : nat
eval (@nat.rec C cZ cS (nat.succ x))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment