phladiprelio-general-simple 0.2.0.0 → 0.2.1.0

raw patch · 3 files changed

+9/−3 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +5/−0
• Phladiprelio/General/Simple.hs +3/−2
• phladiprelio-general-simple.cabal +1/−1

@@ -19,3 +19,8 @@ the results in the default modes and the test for 'smoothness' of the line while reading, speaking, singing etc. +## 0.2.1.0 -- 2023-03-27++* Second version revised A. Added the possibility to use "-t 2" as options to perform weaker and+more permissive test for irregularities that influence the prosody.+

@@ -42,9 +42,10 @@    let syllN = sum . map (countSyll wrs arr us vs) $ rss        universalSet = map unwords . permutations $ rss        f grps mxms = sum . countHashesG hc grps mxms . mconcat . h . createSyllablesPL wrs ks arr gs us vs-   if numTest == 0 then do+   if numTest `elem` [0,2] then do       putStrLn "Feet   Val  Stat   Proxim" -      mapM (\(q,qs) -> let m = stat1 syllN (q,qs) in let max1 = maximumBy (comparing (f q qs)) universalSet in let mx = f q qs max1 in putStrLn (show (fromEnum q) `mappend` "   |   " `mappend`  show mx `mappend` "     " `mappend` show m `mappend` "  -> " `mappend` show (100 * fromIntegral mx / fromIntegral m) `mappend` "%")) $ [(2,[1]),(3,[2,1]),(4,[3,2]),(5,[4,3,2]),(6,[5,4,3]),(7,[6,5,4,3,2])]+      mapM (\(q,qs) -> let m = stat1 syllN (q,qs) in let max1 = maximumBy (comparing (f q qs)) universalSet in let mx = f q qs max1 in putStrLn (show (fromEnum q) `mappend` "   |   " `mappend`  show mx `mappend` "     " `mappend` show m `mappend` "  -> " `mappend` show (100 * fromIntegral mx / fromIntegral m) `mappend` "%")) . +        zip [2..7] $ ([1]:(if numTest == 0 then [[2,1],[3,2],[4,3,2],[5,4,3],[6,5,4,3,2]] else [[2],[3],[4,3],[5,4],[6,5,4]]))    else mapM (\(x,y) -> putStrLn (show x `mappend` (' ':y)))  . (let h1 (u,w) = if descending then ((-1)*u,w) else (u,w) in sortOn h1) . map (\xss -> (f grps mxms xss, xss)) $ universalSet  countSyll 

@@ -1,6 +1,6 @@ cabal-version:      2.4 name:               phladiprelio-general-simple-version:            0.2.0.0+version:            0.2.1.0  -- A short (one-line) description of the package. synopsis:           A generalized functionality of PhLADiPreLiO for different languages that uses hash algorithms.