Contents

(ns trinary)

(defn to-decimal [num]
  (loop [sum 0, num num]
    (if (empty? num)
      sum
      (let [diff (.compareTo (first num) \0)]
        (if (<= 0 diff 2)
          (recur (+ (* sum 3) diff) (next num))
          0)))))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.139	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.138	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.137	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.136	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.135	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.134	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.133	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.132	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.131	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.130	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.129	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.128	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.127	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.126	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.125	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.124	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.123	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.122	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.121	tracks/clojure/exercises/trinary/src/example.clj
trackler-2.2.1.120	tracks/clojure/exercises/trinary/src/example.clj