Add version test to triangle exercise

This follows the pattern set by some of the other exercises.
This commit is contained in:
Jay Hayes 2017-07-06 07:19:14 -05:00
parent d76d7ecb7b
commit 183847554f

View file

@ -8,7 +8,9 @@ import Triangle exposing (triangleKind, Triangle(..))
tests : Test tests : Test
tests = tests =
describe "triangleKind" describe "triangleKind"
[ test "equilateral triangles have equal sides" <| [ test "the solution is for the correct version of the test" <|
\() -> Expect.equal 2 version
, test "equilateral triangles have equal sides" <|
\() -> Expect.equal (Ok Equilateral) (triangleKind 2 2 2) \() -> Expect.equal (Ok Equilateral) (triangleKind 2 2 2)
, test "larger equilateral triangles also have equal sides" <| , test "larger equilateral triangles also have equal sides" <|
\() -> Expect.equal (Ok Equilateral) (triangleKind 10 10 10) \() -> Expect.equal (Ok Equilateral) (triangleKind 10 10 10)