mmsyn7s 0.6.5.0 → 0.6.5.1

raw patch · 3 files changed

+12/−4 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +5/−1
• MMSyn7s.hs +6/−2
• mmsyn7s.cabal +1/−1

@@ -70,6 +70,10 @@ classical sounds in the MMSyn7.Syllable module and respectively in the MMSyn7s and Main modules. Changed the behaviour for "-s2" first command line argument for mmsyn7s executable. Some minor documentation improvements. -## 0.6.4.0 -- 2020-03-01+## 0.6.5.0 -- 2020-03-01  * Sixth version revised E. Improved the performance of the 'main7s' function for the "-s" first command line parameter.++## 0.6.5.1 -- 2020-03-01++* Sixth version revised F. Improved formatting for the statistics printing for "-s" and "-s2" first command line arguments. 

@@ -107,7 +107,7 @@                  ; putStrLn "which shows what sound representations are needed to be created if every sound is unique; "                  ; putStrLn "      the other beginning is equivalent to the \"0\" behaviour."                   }-      "-v" -> putStrLn "mmsyn7s: version 0.6.5.0"+      "-v" -> putStrLn "mmsyn7s: version 0.6.5.1"       "-s" -> let ys = unwords . drop 1 $ texts                   zs = uniquenessPeriods ys in                   if zs /= [0::Int]@@ -118,6 +118,7 @@                                   s  = sqrt d                                   mx = maximum zs                                   mn = minimum zs+                            ; putStrLn "---------------------------------------------------------------------------"                             ; putStrLn $ "Uniqueness periods:                                                      " ++ (show zs)                             ; putStrLn $ "Possibly unique sounds representations density:                          " ++ show (fromIntegral t / (fromIntegral . length . show7s $ ys))                             ; putStrLn $ "Number of sounds representations that are enough to cover the text:      " ++ show t@@ -126,7 +127,8 @@                             ; putStrLn $ "Standard quadratic deviation for the uniqueness periods list:            " ++ show s                             ; putStrLn $ "The maximum element in the uniqueness periods list:                      " ++ show mx                             ; putStrLn $ "The minimum element in the uniqueness periods list:                      " ++ show mn }-                    else do { putStrLn $ "Uniqueness periods:                                                      [0]"+                    else do { putStrLn "------------------------------------------------------------------------------"+                            ; putStrLn $ "Uniqueness periods:                                                      [0]"                             ; putStrLn $ "Possibly unique sounds representations density:                          0.0"                             ; putStrLn $ "Number of sounds representations that are enough to cover the text:      0"                             ; putStrLn $ "Mean for the uniqueness periods list:                                    0.0"@@ -148,7 +150,9 @@   do { let m = read xs :: Int            zss = takeWordSP m . unwords $ yss            tss = sylLengthsP2 zss     +     ; putStrLn "---------------------------------------------------------------------------"      ; putStrLn $ "Syllables in the text:                                                   " ++ (show . fmap (fmap (concatMap show)) $ zss)+     ; putStrLn "---------------------------------------------------------------------------"      ; putStrLn $ "Number of the Ukrainian sounds in the syllables in the text:             " ++ show tss      ; putStrLn ""      }

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                mmsyn7s-version:             0.6.5.0+version:             0.6.5.1 synopsis:            Shows a sorted list of the Ukrainian sounds representations that can be used by mmsyn7 series of programs description:         A program and a library that show a sorted list of the Ukrainian sounds representations that can be used by mmsyn7 series of programs homepage:            https://hackage.haskell.org/package/mmsyn7s