Skip to content

Instantly share code, notes, and snippets.

/hyone-4clojure-solution65.clj

Created June 29, 2011 05:06
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
  • Save anonymous/1053184 to your computer and use it in GitHub Desktop.
Save anonymous/1053184 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
hyone-4clojure-solution65.clj
;; hyone's solution to Black Box Testing
;; https://4clojure.com/problem/65
(fn seq-type [coll]
(let [base (empty coll)]
(cond
(= base {}) :map
(= base #{}) :set
(reversible? base) :vector
(= base ()) :list)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment