dobutokO-poetry 0.16.0.0 → 0.16.1.0

raw patch · 3 files changed

+9/−5 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• DobutokO/Poetry/Ukrainian/PrepareText.hs +4/−4
• dobutokO-poetry.cabal +1/−1

@@ -92,3 +92,7 @@  * Sixteenth version. Added new module DobutokO.Poetry.Ukranian.PrepareText that allows to prepare the text to preserve possibly the needed grammar.  Added explicit dependencies (they were earler implicit) of mmsyn2 and mmsyn5. ++## 0.16.1.0 -- 2020-08-24++* Sixteenth version revised A. Fixed an issue with usage of the jottedConv function in the DobutokO.Poetry.Ukranian.PrepareText mudule. 

@@ -106,11 +106,11 @@ auxiliary1 :: [String] -> [String] auxiliary1 (xs:ys:zs:xss)    | isConcatenated ys || isPronoun ys = -      auxiliary1 (xs:auxiliary1 ((ys ++ jottedConv zs):xss))-  | isConcatenated xs || isPronoun xs = auxiliary1 ((xs ++ jottedConv ys):zs:xss)+      auxiliary1 (xs:auxiliary1 ((ys ++ (drop 1 . jottedConv $ ' ':ys)):xss))+  | isConcatenated xs || isPronoun xs = auxiliary1 ((xs ++ (drop 1 . jottedConv $ ' ':ys)):zs:xss)   | otherwise = xs:auxiliary1 (ys:zs:xss) auxiliary1 x@(xs:ys:xss) -  | isConcatenated xs || isPronoun xs = auxiliary1 ((xs ++ jottedConv ys):xss)+  | isConcatenated xs || isPronoun xs = auxiliary1 ((xs ++ (drop 1 . jottedConv $ ' ':ys)):xss)   | otherwise = x auxiliary1 xss = xss @@ -191,7 +191,7 @@  "\1087\1088\1086\1090\1077","\1089\1072\1084\1077","\1089\1077\1073\1090\1086","\1090\1072\1082\1080",  "\1090\1086\1073\1090\1086","\1090\1110\1083\1100\1082\1080","\1093\1072\1081","\1093\1086\1095",  "\1093\1110\1073\1072","\1094\1077\1073\1090\1086","\1097\1086\1073","\1103\1082\1073\1080",- "\1103\1082\1088\1072\1079","\1103\1082\1097\1086"] $ replicate 100 ((xs ++ jottedConv ys):concatenated2 xss)) xs+ "\1103\1082\1088\1072\1079","\1103\1082\1097\1086"] $ replicate 100 ((xs ++ (drop 1 . jottedConv $ ' ':ys)):concatenated2 xss)) xs concatenated2 xss = xss   isSpC :: Char -> Bool

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                dobutokO-poetry-version:             0.16.0.0+version:             0.16.1.0 synopsis:            Helps to order the 7 or less Ukrainian words to obtain somewhat suitable for poetry or music text description:         Helps to order the 7 or less Ukrainian words (or their concatenations) to obtain somewhat suitable for poetry or music text. Can be also used as a research instrument with generalized functions.