Last active
July 8, 2019 12:45
-
-
Save erez-rabih/8066911738039116e31df9e850ccb331 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (def millis-in-year (* 1000 60 60 24 365)) | |
| (defn serve-vodka [user-id] | |
| (let [user (user/find-by-id user-id) | |
| millis-since-born (- (System/currentTimeMillis) (:birthtime user)) | |
| years-since-born (/ millis-since-born millis-in-year)] | |
| (if (>= years-since-born 21) | |
| "Here's your vodka!" | |
| "Too Young!"))) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
31