Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (ns nuconta-hacks (:require [schema.core :as s]))
- (s/defschema CoolShit {:cool s/Any})
- (s/defn coolify [thing :- s/Any]
- {:cool thing})
- (defn hack [hackable]
- (:idea hackable))
- (defn a-ton [thing]
- (repeat 50 thing))
- (s/defn lots-of-cool-things :- [CoolShit] [idea]
- (->> idea
- hack
- a-ton
- (map coolify)))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement