Example implementation of card shuffling in Clojure

cards.clj

(def suits [:clubs :hearts :spades :diamonds])

(def ranks [2 3 4 5 6 7 8 9 10 :jack :queen :king :ace])

(def deck (for [s suits, r ranks] [s r]))

(println "Shuffled deck:" (shuffle deck))

output.txt

$ clj cards.clj
Shuffled deck: [[:clubs 6] [:clubs 7] [:clubs 8] [:spades 3] [:spades 9] [:diamonds 10] [:hearts 7] [:diamonds 7] [:spades 5] [:diamonds 4] [:hearts 4] [:clubs 10] [:diamonds :ace] [:clubs 3] [:hearts :king] [:spades :queen] [:diamonds 6] [:clubs :jack] [:hearts 8] [:spades :king] [:spades :jack] [:spades :ace] [:hearts 3] [:clubs 9] [:clubs 2] [:spades 7] [:diamonds 3] [:spades 2] [:clubs :queen] [:clubs 5] [:clubs :king] [:hearts :queen] [:diamonds :jack] [:hearts 5] [:clubs 4] [:spades 8] [:clubs :ace] [:hearts 6] [:hearts 10] [:hearts :jack] [:diamonds 5] [:diamonds 9] [:hearts 9] [:diamonds 2] [:spades 6] [:hearts 2] [:hearts :ace] [:diamonds 8] [:spades 10] [:spades 4] [:diamonds :queen] [:diamonds :king]]