Skip to content

Instantly share code, notes, and snippets.

Created November 16, 2017 18:45
What would you like to do?
data IOSpec : Type -> Type where
Pure : a -> IOSpec a
Bind : IOSpec a -> (a -> IOSpec b) -> IOSpec b
WriteLine : String -> IOSpec ()
ReadLine : IOSpec String
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment