Skip to content

Instantly share code, notes, and snippets.

@moonmaster9000

moonmaster9000/consistency.hs

Created May 1, 2010 22:44
Show Gist options
  • Save moonmaster9000/386726 to your computer and use it in GitHub Desktop.
Save moonmaster9000/386726 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
consistency.hs
clarke = createAuthor "Arthur C. Clarke" ["Garden of Rama"]
lee = createAuthor "Gentry Lee" ["Garden of Rama"]
gardenAuthorsAccordingToClarke = map name $ authors $ head $ books clarke
-- ["Arthur C. Clarke"]
gardenAuthorsAccordingToLee = map name $ authors $ head $ books lee
-- ["Gentry Lee"]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment