Sha256: 10c01b64814f4a709c226fbf68f178dbe64677cb22d278ac4a544e0fc937daeb
Contents?: true
Size: 521 Bytes
Versions: 78
Compression:
Stored size: 521 Bytes
Contents
module Triangle let private isValid triangle = let nonZero = List.sum triangle <> 0.0 let equality = let [x; y; z] = triangle x + y >= z && x + z >= y && y + z >= x equality && nonZero let private distinctSides triangle = triangle |> List.distinct |> List.length let equilateral triangle = isValid triangle && distinctSides triangle = 1 let isosceles triangle = isValid triangle && distinctSides triangle <= 2 let scalene triangle = isValid triangle && distinctSides triangle = 3
Version data entries
78 entries across 78 versions & 1 rubygems