Skip to content

Instantly share code, notes, and snippets.

@mkwatson

mkwatson/test.clj

Created July 8, 2019 17:57
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mkwatson/1ca568c8b62e5ef8effe4a3a4123d9b9 to your computer and use it in GitHub Desktop.
Save mkwatson/1ca568c8b62e5ef8effe4a3a4123d9b9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
test.clj
(defmulti sell-booze (fn [store person] [(over-21? person) (enough-supply? store) (enough-money? person)])
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment