Sha256: 4a59a83ac7a62a9006cbb7f8d6ac3dd498ea491e1fd8e92705d35988cc01c2c4
Contents?: true
Size: 319 Bytes
Versions: 396
Compression:
Stored size: 319 Bytes
Contents
(defpackage #:triangle
(:use #:cl)
(:export #:triangle))
(in-package #:triangle)
(defun triangle (a b c)
(let ((sorted (sort (list a b c) #'>)))
(if (>= (first sorted) (apply #'+ (rest sorted))) :illogical
(case (length (remove-duplicates sorted))
(1 :equilateral)
(2 :isosceles)
(3 :scalene)))))
Version data entries
396 entries across 396 versions & 1 rubygems