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.1.0.0	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.55	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.54	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.53	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.52	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.51	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.50	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.49	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.48	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.47	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.46	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.45	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.44	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.43	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.42	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.41	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.40	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.39	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.38	tracks/clojure/exercises/triangle/src/example.clj
trackler-2.0.8.37	tracks/clojure/exercises/triangle/src/example.clj