add test chapter 1 task 7 (kowainik#139)

* add test chapter 1 task 7 * add test task7 negatives mix
surskitt · Oct 8, 2020 · ce4dd66 · ce4dd66
1 parent 7853765
commit ce4dd66
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/test/Test/Chapter1.hs b/test/Test/Chapter1.hs
@@ -48,8 +48,10 @@ chapter1normal = describe "Chapter1Normal" $ do
     describe "Task7: mid" $ do
         it "positives up  " $ mid 10 20 30 `shouldBe` 20
         it "positives down" $ mid 30 20 10 `shouldBe` 20
+        it "positives mix " $ mid 20 30 10 `shouldBe` 20
         it "negatives down" $ mid (-10) (-20) (-30) `shouldBe` (-20)
         it "negatives up  " $ mid (-30) (-20) (-10) `shouldBe` (-20)
+        it "negatives mix " $ mid (-20) (-30) (-10) `shouldBe` (-20)
         it "all equal" $ mid 1 1 1 `shouldBe` 1
         it "all equal, except 1" $ mid 1 1 2 `shouldBe` 1
     describe "Task8: isVowel" $ do