ukrainian-phonetics-basic 0.3.1.2 → 0.3.2.0
raw patch · 3 files changed
+27/−2 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Languages.Phonetic.Ukrainian.Syllable: syllableDurations3 :: [[[UZPP2]]] -> [[Float]]
+ Languages.Phonetic.Ukrainian.Syllable: uzpp2Durat3 :: UZPP2 -> Float
Files
- CHANGELOG.md +5/−0
- Languages/Phonetic/Ukrainian/Syllable.hs +21/−1
- ukrainian-phonetics-basic.cabal +1/−1
CHANGELOG.md view
@@ -80,3 +80,8 @@ ## 0.3.1.2 -- 2020-11-26 * Third version revised C. Some minor code optimization in the Languages.Phonetics.Ukrainian.Syllable module.++## 0.3.2.0 -- 2020-12-03++* Third version revised D. Added a new variant of the uzpp2 to float conversion function to the+Languages.Phonetics.Ukrainian.Syllable module.
Languages/Phonetic/Ukrainian/Syllable.hs view
@@ -11,7 +11,7 @@ {-# LANGUAGE DeriveDataTypeable, FlexibleInstances #-} -module Languages.Phonetic.Ukrainian.Syllable where+module Languages.Phonetic.Ukrainian.Syllable where import Prelude hiding (mappend) import Data.Monoid@@ -258,6 +258,22 @@ (UZ 'q' E, 0.020227), (UZ 'r' S, 0.049206), (UZ 'r' O, 0.049206), (UZ 's' L, 0.074603), (UZ 't' L, 0.110658), (UZ 't' M, 0.110658), (UZ 'u' W, 0.109070), (UZ 'v' S, 0.082268), (UZ 'v' O, 0.082268), (UZ 'w' N, 0.089342), (UZ 'x' L, 0.077188), (UZ 'x' M, 0.077188), (UZ 'y' W, 0.099955), (UZ 'z' D, 0.056054), (UZ 'z' K, 0.056054)]) +uzpp2Durat3 :: UZPP2 -> Float+uzpp2Durat3 = X.getBFst' (0.05779993, VB.fromList [(UZ 'A' D, 0.08453724), (UZ 'A' K, 0.08453724),+ (UZ 'B' D, 0.09996042), (UZ 'B' K, 0.09996042), (UZ 'C' S, 0.10975353), (UZ 'D' N, 0.08190674),+ (UZ 'E' L, 0.11906522), (UZ 'E' M, 0.11906522), (UZ 'F' L, 0.13985258), (UZ 'F' M, 0.13985258),+ (UZ 'a' W, 0.25872483), (UZ 'b' D, 0.13787716), (UZ 'b' K, 0.13787716), (UZ 'c' D, 0.05901357),+ (UZ 'd' D, 0.07437409), (UZ 'd' K, 0.07437409), (UZ 'e' W, 0.22876537), (UZ 'f' L, 0.15880087),+ (UZ 'f' M, 0.15880087), (UZ 'g' D, 0.07985903), (UZ 'g' K, 0.07985903), (UZ 'h' D, 0.10289067),+ (UZ 'h' K, 0.10289067), (UZ 'i' W, 0.19777405), (UZ 'j' D, 0.10039843), (UZ 'j' K, 0.10039843),+ (UZ 'k' L, 0.05893304), (UZ 'k' M, 0.05893304), (UZ 'l' S, 0.10906450), (UZ 'l' O, 0.10906450),+ (UZ 'm' S, 0.14576594), (UZ 'm' O, 0.14576594), (UZ 'n' S, 0.06084464), (UZ 'n' O, 0.06084464),+ (UZ 'o' W, 0.25423777), (UZ 'p' L, 0.10765654), (UZ 'p' M, 0.10765654), (UZ 'q' E, 0.01943042),+ (UZ 'r' S, 0.05937718), (UZ 'r' O, 0.05937718), (UZ 's' L, 0.06247632), (UZ 't' L, 0.06039120),+ (UZ 't' M, 0.06039120), (UZ 'u' W, 0.20243791), (UZ 'v' S, 0.07798724), (UZ 'v' O, 0.07798724),+ (UZ 'w' N, 0.07844400), (UZ 'x' L, 0.13526622), (UZ 'x' M, 0.13526622), (UZ 'y' W, 0.19849003),+ (UZ 'z' D, 0.06643842), (UZ 'z' K, 0.06643842)])+ -- | General variant of the 'syllableDurations' function with the arbitrary 'uzpp2Durat1'-like function. syllableDurationsG :: (UZPP2 -> Float) -> [[[UZPP2]]] -> [[Float]] syllableDurationsG g = fmap (fmap (sum . fmap g))@@ -270,3 +286,7 @@ -- | Likewise 'syllableDurations', but uses 'uzpp2Durat2' instead of 'uzpp2Durat1'. syllableDurations2 :: [[[UZPP2]]] -> [[Float]] syllableDurations2 = syllableDurationsG uzpp2Durat2++-- | Likewise 'syllableDurations', but uses 'uzpp2Durat3' instead of 'uzpp2Durat1'.+syllableDurations3 :: [[[UZPP2]]] -> [[Float]]+syllableDurations3 = syllableDurationsG uzpp2Durat3
ukrainian-phonetics-basic.cabal view
@@ -2,7 +2,7 @@ -- further documentation, see http://haskell.org/cabal/users-guide/ name: ukrainian-phonetics-basic-version: 0.3.1.2+version: 0.3.2.0 synopsis: A library to work with the basic Ukrainian phonetics and syllable segmentation. description: A library to work with the basic Ukrainian phonetics and syllable segmentation. Rewritten from the mmsyn6ukr and mmsyn7s packages. homepage: https://hackage.haskell.org/package/ukrainian-phonetics-basic