Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
data Ohoh : Set where
dio : Ohoh
su : Ohoh -> Ohoh
val : Ohoh
val = su (su (su dio))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment