Contents

(ns triangle
  (:refer-clojure :exclude [type]))

(defn type [a b c]
  (let [sorted (sort > [a b c])]
    (if (>= (first sorted) (apply + (rest sorted))) :illogical
        (case (count (set sorted))
          1 :equilateral
          2 :isosceles
          3 :scalene))))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.0.8.36	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.35	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.34	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.33	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.32	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.31	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.30	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.29	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.28	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.27	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.26	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.24	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.23	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.22	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.21	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.20	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.19	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.18	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.17	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.16	tracks/clojure/exercises/triangle/src/example.clj