rendezvous with cassidoo challenge: 24.12.02

roll_call.clj

(ns roll-call
  (:require [clojure.test :refer [deftest is]]))

(defn roll-call [names]
  (->> names
       (map reverse)
       (map (partial apply str))
       sort))

(deftest roll-call-test
  (is (= (roll-call ["yzneT" "ydissaC" "enimA"])
         ["Amine" "Cassidy" "Tenzy"]))

  (is (= (roll-call ["rennoD" "nexiV" "recnarP" "temoC" "neztilB" "recnaD" "dipuC" "rehsaD" "hploduR"])
         ["Blitzen" "Comet" "Cupid" "Dancer" "Dasher" "Donner" "Prancer" "Rudolph" "Vixen"]))

  (is (= (roll-call ["A" "B" "C"])
         ["A" "B" "C"])))