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.15	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.14	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.13	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.12	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.11	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.10	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.9	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.8	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.7	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.6	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.5	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.4	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.3	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.2	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.1	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.7.0	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.6.44	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.6.43	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.6.42	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.6.41	tracks/clojure/exercises/triangle/src/example.clj