Skip to content

Instantly share code, notes, and snippets.

@anildigital

anildigital/gist:33c8b4d18c277e76b394 Secret

Last active December 21, 2015 19:49
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 anildigital/33c8b4d18c277e76b394 to your computer and use it in GitHub Desktop.
Save anildigital/33c8b4d18c277e76b394 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(ns bob)
(def things {"Whatever." ["Tom-ay-to, tom-aaaah-to." "It's OK if you don't want to go to the DMV." "Ending with ? means a question." "Let's go make out behind the gym!"] "Woah, chill out!" ["WATCH OUT!" "WHAT THE HELL WERE YOU THINKING?" "Woah, chill out!" "ZOMG THE %^*@#$(*^ ZOMBIES ARE COMING!!11!!1!" "1, 2, 3 GO!" "I HATE YOU" "Woah, chill out!"] "Sure!" ["Does this cryogenic chamber make me look fat?"] "" ["Fine. Be that way."]})
(defn response-for [input]
(doseq [[k v] things]
(cond ((set v) input)
k)))
(response-for "WATCH OUT!")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment