diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -66,9 +66,13 @@
 
 ## 0.3.0.0 -- 2020-11-25
 
-* Third version. Added new functions to support not only vector-based computations in the Languages.Phonetics.Ukrainian.Syllable module, but also the list-based ones. Added a 
+* Third version. Added new functions to support not only vector-based computations in the Languages.Phonetics.Ukrainian.Syllable module, but also the list-based ones. Added a
 new dependency of subG package.
 
 ## 0.3.1.0 -- 2020-11-25
 
 * Third version revised A. Removed subG from the dependencies. Some code improvements.
+
+## 0.3.1.1 -- 2020-11-26
+
+* Third version revised B. Some code optimizations in the Languages.Phonetics.Ukrainian.Syllable module.
diff --git a/Languages/Phonetic/Ukrainian/Syllable.hs b/Languages/Phonetic/Ukrainian/Syllable.hs
--- a/Languages/Phonetic/Ukrainian/Syllable.hs
+++ b/Languages/Phonetic/Ukrainian/Syllable.hs
@@ -190,11 +190,16 @@
 {-# INLINE createSyllablesUkr #-}
 
 createSyllablesUkrS :: String -> [[[UZPP2]]]
-createSyllablesUkrS = map (divVwls . reSyllableCntnts . groupSnds . str2UZPP2s) . words . mapMaybe g . convertToProperUkrainianS . map (\x -> if x == '-' then ' ' else x)
+createSyllablesUkrS = map (divVwls . reSyllableCntnts . groupSnds . str2UZPP2s) . words1 . mapMaybe g . convertToProperUkrainianS . map (\x -> if x == '-' then ' ' else x)
   where g x
-          | x `elem` " 1-" = Just ' '
           | x == '0' = Nothing
+          | x == '1' = Just ' '
+          | x == '-' = Just ' '
           | otherwise = Just x
+        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
+        {-# NOINLINE words1 #-}
 {-# INLINE createSyllablesUkrS #-}
 
 createSyllablesUkrP :: String -> [[[UZPP2]]]
diff --git a/ukrainian-phonetics-basic.cabal b/ukrainian-phonetics-basic.cabal
--- a/ukrainian-phonetics-basic.cabal
+++ b/ukrainian-phonetics-basic.cabal
@@ -2,7 +2,7 @@
 -- further documentation, see http://haskell.org/cabal/users-guide/
 
 name:                ukrainian-phonetics-basic
-version:             0.3.1.0
+version:             0.3.1.1
 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