Skip to content

Instantly share code, notes, and snippets.

@shigemk2

shigemk2/empty.hs

Created Apr 1, 2015
Embed
What would you like to do?
-- 結合性
infixr 5 :-:
data List a = Empty | a :-: (List a) deriving (Show, Read, Eq, Ord)
main = do
print $ 3 :-: 4 :-: 5 :-: Empty
let a = 3 :-: 4 :-: 5 :-: Empty
print $ 100 :-: a
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.