specs :: Spec
specs = do
          describe "scoreLetter" $ do
            it "'a'" $ scoreLetter 'a' `shouldBe`  1
            it "'Z'" $ scoreLetter 'Z' `shouldBe` 10
            it "'?'" $ scoreLetter '?' `shouldBe`  0
          describe "scoreWord" $ for_ cases test
specs :: Spec
specs = do
          describe "scoreLetter" $ do
            it "'a'" $ scoreLetter 'a' `shouldBe`  1
            it "'Z'" $ scoreLetter 'Z' `shouldBe` 10
            it "'?'" $ scoreLetter '?' `shouldBe`  0
          describe "scoreWord" $ for_ cases test
specs = do
          describe "scoreLetter" $ do
            it "'a'" $ scoreLetter 'a' `shouldBe`  1
            it "'Z'" $ scoreLetter 'Z' `shouldBe` 10
            it "'?'" $ scoreLetter '?' `shouldBe`  0
          describe "scoreWord" $ for_ cases test