phonetic-languages-simplified-generalized-properties-array 0.1.2.0 → 0.2.0.0

raw patch · 3 files changed

+16/−12 lines, 3 filesdep ~phonetic-languages-phonetics-basicsPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: phonetic-languages-phonetics-basics

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• Phonetic/Languages/Array/General/PropertiesFuncRepG2.hs +8/−8
• phonetic-languages-simplified-generalized-properties-array.cabal +4/−4

@@ -19,3 +19,7 @@ ## 0.1.2.0 -- 2021-05-19  * First version revised D. Changed the dependency boundaries.++## 0.2.0.0 -- 2021-06-04++* Second version. Changed the code related to the breaking update of the phonetic-languages-phonetics-basics package.

@@ -64,7 +64,7 @@   -- source code of the module.   -> (Int16 -> c)   -> FuncRep2 String Int16 c-procDiverse2I wrs zs g = D (diverse2GL zs . map char . stringToXG wrs) g+procDiverse2I wrs zs g = D (diverse2GL zs . concatMap string1 . stringToXG wrs) g {-# INLINE procDiverse2I #-}  procDiverse2F@@ -73,7 +73,7 @@   -- source code of the module.   -> (Double -> c)   -> FuncRep2 String Double c-procDiverse2F wrs zs g = D (int2Double . fromEnum . diverse2GL zs . map char . stringToXG wrs) g+procDiverse2F wrs zs g = D (int2Double . fromEnum . diverse2GL zs . concatMap string1 . stringToXG wrs) g {-# INLINE procDiverse2F #-}  --------------------------------------------------------------------------------------------@@ -102,8 +102,8 @@   -> ([[[PRS]]] -> [[Double]])   -> Coeffs2   -> FuncRep2 String Double c-procB2FG wrs ks arr gs us vs h1 h g coeffs = let zs = ' ':us `mappend` vs in D (\xs -> let ys = map char . stringToXG wrs . map (\x -> if x == '-' then ' ' else x) $ xs in-  ((int2Double . fromEnum . diverse2GL zs $ ys)*(h1 . mconcat . g . map (divVwls . reSyllableCntnts ks gs . groupSnds .+procB2FG wrs ks arr gs us vs h1 h g coeffs = let zs = ' ':us `mappend` vs in D (\xs -> let ys = concatMap string1 . stringToXG wrs . map (\x -> if x == '-' then ' ' else x) $ xs in+  ((int2Double . fromEnum . diverse2GL zs $ ys)*(h1 . mconcat . g . map (divSylls . reSyllableCntnts ks gs . groupSnds .     str2PRSs arr) . words1 . mapMaybe (f us vs) $ ys))) h {-# INLINE procB2FG #-} @@ -149,10 +149,10 @@   -> Coeffs2   -> FuncRep2 String Double c procB2InvFG wrs ks arr gs us vs h1 h g coeffs = let zs = ' ':us `mappend` vs in D (\xs ->-  let !ys = map char . stringToXG wrs . map (\x -> if x == '-' then ' ' else x) $ xs-      !z = diverse2GL zs ys in if z == 0 then  (h1 . mconcat . g . map (divVwls . reSyllableCntnts ks gs . groupSnds .+  let !ys = concatMap string1 . stringToXG wrs . map (\x -> if x == '-' then ' ' else x) $ xs+      !z = diverse2GL zs ys in if z == 0 then  (h1 . mconcat . g . map (divSylls . reSyllableCntnts ks gs . groupSnds .          str2PRSs arr) . words1 . mapMaybe (f us vs) $ ys) ** 2.0-        else  ((h1 . mconcat . g . map (divVwls . reSyllableCntnts ks gs . groupSnds . str2PRSs arr) . words1 .+        else  ((h1 . mconcat . g . map (divSylls . reSyllableCntnts ks gs . groupSnds . str2PRSs arr) . words1 .           mapMaybe (f us vs) $ ys) / (int2Double . fromEnum $ z))) h {-# INLINE procB2InvFG #-} @@ -222,5 +222,5 @@  words1 xs = if null ts then [] else w : words1 s'' -- Practically this is an optimized version for this case 'words' function from Prelude.   where ts = dropWhile (== ' ') xs-        (w, s'') = span (/= ' ') ts+        (w, s'') = break (== ' ') ts {-# NOINLINE words1 #-}

@@ -3,9 +3,9 @@ -- http://haskell.org/cabal/users-guide/  name:                phonetic-languages-simplified-generalized-properties-array-version:             0.1.2.0-synopsis:            Generalization of the functionality of the phonetic-languages-simplified-properties-array.-description:         Is intended to be used with the general phonetic languages approach. +version:             0.2.0.0+synopsis:            Some 'properties' of the phonetic languages approach text.+description:         Generalizes the functionality of the https://hackage.haskell.org/package/phonetic-languages-simplified-properties-array  homepage:            https://hackage.haskell.org/package/phonetic-languages-simplified-generalized-properties-array license:             MIT license-file:        LICENSE@@ -21,6 +21,6 @@   exposed-modules:     Phonetic.Languages.Array.General.PropertiesFuncRepG2, Phonetic.Languages.Array.General.PropertiesSyllablesG2   -- other-modules:   other-extensions:    CPP, BangPatterns-  build-depends:       base >=4.8 && <4.15, phonetic-languages-simplified-base >=0.2 && <1, phonetic-languages-rhythmicity >=0.2 && <1, phonetic-languages-phonetics-basics >=0.6.3 && <1+  build-depends:       base >=4.8 && <4.15, phonetic-languages-simplified-base >=0.2 && <1, phonetic-languages-rhythmicity >=0.2 && <1, phonetic-languages-phonetics-basics >=0.7 && <1   -- hs-source-dirs:   default-language:    Haskell2010