Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
data Frame : Type where
TwoRolls : (x, y : Nat) -> Frame
Strike : Frame
roll : (x, y: Nat) -> Frame
roll x y = TwoRolls x y
strike : Frame
strike = Strike
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment