phonetic-languages-simplified-properties-array 0.7.0.0 → 0.8.0.0
raw patch · 3 files changed
+30/−5 lines, 3 filesdep ~phonetic-languages-rhythmicityPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: phonetic-languages-rhythmicity
API changes (from Hackage documentation)
Files
- CHANGELOG.md +5/−0
- Phonetic/Languages/Array/Ukrainian/PropertiesSyllablesG2.hs +23/−3
- phonetic-languages-simplified-properties-array.cabal +2/−2
CHANGELOG.md view
@@ -51,3 +51,8 @@ * Seventh version. Some code improvements. Added also the properties with weighted functions that try to increase the importance of the line ending and to decrease the importance of the beginnings.++## 0.8.0.0 -- 2021-08-17++* Eigth version. Fixed issues with wrong mapping. Some code improvements. Added also the properties with linear+weighted functions.
Phonetic/Languages/Array/Ukrainian/PropertiesSyllablesG2.hs view
@@ -198,10 +198,14 @@ rhythmicity :: Double -> String -> Coeffs2 -> String -> Double rhythmicity k choice CF0 = if- | take 1 choice `elem` ["c","B","C","M","N"] -> let just_probe = readRhythmicity choice in+ | take 1 choice `elem` ["c","M","N"] || (take 1 choice >= "A" && take 1 choice <= "F") -> let just_probe = readRhythmicity choice in case just_probe of Just (P1 ch rh n) -> rhythmicityABC 1.0 2.0 0.125 ch rh . mconcat . (helperF4 n) . createSyllablesUkrS Just (P2 ch rh r n) -> case take 1 choice of+ "A" -> rhythmicityPolyWeightedLEF2 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS+ "D" -> rhythmicityPolyWeightedLF2 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS+ "E" -> rhythmicityPolyWeightedLEF3 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS+ "F" -> rhythmicityPolyWeightedLF3 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS "B" -> rhythmicityPolyWeightedEF2 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS "C" -> rhythmicityPolyWeightedF2 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS "M" -> rhythmicityPolyWeightedEF3 1.0 r ch rh . mconcat . (helperF4 n) . createSyllablesUkrS@@ -235,8 +239,24 @@ _ -> rhythmicity04 | otherwise -> rhythmicity04 | otherwise -> if- | ((take 1 choice >= "u" && take 1 choice <= "t") || (take 1 choice >= "I" && take 1 choice <= "Z")) && (drop 2 . take 3 $ choice) >= "1" && (drop 2 . take 3 $ choice) <= "4" ->+ | take 1 choice == "b" || ((take 1 choice >= "d" && take 1 choice <= "v") || (take 1 choice >= "I" && take 1 choice <= "Z")) && (drop 2 . take 3 $ choice) >= "1" && (drop 2 . take 3 $ choice) <= "4" -> case take 1 choice of+ "b" -> g rhythmicityPolyWeightedLEF3 5 1+ "d" -> g rhythmicityPolyWeightedLEF30 5 1+ "e" -> g rhythmicityPolyWeightedLEF3 6 2+ "f" -> g rhythmicityPolyWeightedLEF30 6 2+ "g" -> g rhythmicityPolyWeightedLEF2 5 1+ "h" -> g rhythmicityPolyWeightedLEF20 5 1+ "i" -> g rhythmicityPolyWeightedLEF2 6 2+ "j" -> g rhythmicityPolyWeightedLEF20 6 2+ "k" -> g rhythmicityPolyWeightedLF3 5 1+ "l" -> g rhythmicityPolyWeightedLF30 5 1+ "m" -> g rhythmicityPolyWeightedLF3 6 2+ "n" -> g rhythmicityPolyWeightedLF30 6 2+ "o" -> g rhythmicityPolyWeightedLF2 5 1+ "p" -> g rhythmicityPolyWeightedLF20 5 1+ "q" -> g rhythmicityPolyWeightedLF2 6 2+ "r" -> g rhythmicityPolyWeightedLF20 6 2 "I" -> g rhythmicityPolyWeightedEF3 5 1 "J" -> g rhythmicityPolyWeightedEF30 5 1 "K" -> g rhythmicityPolyWeightedEF3 6 2@@ -333,7 +353,7 @@ {-# INLINE x1F #-} {-# INLINE xxF #-} _ -> if- | ((take 1 choice >= "u" && take 1 choice <= "t") || (take 1 choice >= "I" && take 1 choice <= "Z")) || take 1 choice `elem` ["c","B","C"] -> rhythmicity k choice CF0+ | ((take 1 choice >= "b" && take 1 choice <= "v") || (take 1 choice >= "A" && take 1 choice <= "Z" && take 1 choice `notElem` ["G","H"])) -> rhythmicity k choice CF0 | otherwise -> rhythmicityK4 (fromMaybe 1.0 x) (fromMaybe 1.0 y) helperF4 :: Int -> [[[UZPP2]]] -> [[Double]]
phonetic-languages-simplified-properties-array.cabal view
@@ -2,7 +2,7 @@ -- For further documentation, see http://haskell.org/cabal/users-guide/ name: phonetic-languages-simplified-properties-array-version: 0.7.0.0+version: 0.8.0.0 synopsis: A generalization of the uniqueness-periods-vector-properties package. description: Is a simplified version of the functionality of the former one. Uses lists and arrays as main processment data types. Uses Double whenever applicable. homepage: https://hackage.haskell.org/package/phonetic-languages-simplified-properties-array@@ -20,6 +20,6 @@ exposed-modules: Phonetic.Languages.Array.Ukrainian.PropertiesFuncRepG2, Phonetic.Languages.Array.Ukrainian.PropertiesSyllablesG2 -- other-modules: other-extensions: BangPatterns, CPP, MultiWayIf- build-depends: base >=4.8 && <4.15, phonetic-languages-rhythmicity >=0.8 && <1, phonetic-languages-simplified-base >=0.1 && <1, ukrainian-phonetics-basic-array >=0.1.2 && <1+ build-depends: base >=4.8 && <4.15, phonetic-languages-rhythmicity >=0.9 && <1, phonetic-languages-simplified-base >=0.1 && <1, ukrainian-phonetics-basic-array >=0.1.2 && <1 -- hs-source-dirs: default-language: Haskell2010