diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -32,3 +32,7 @@
 
 * Third version revised B. Updated the dependency boundaries to support the newer GHC-9.* series.
 
+## 0.3.3.0 -- 2022-08-15
+
+* Third version revised C. Some code improvements, updated the obsoleted parts in function definitions.
+
diff --git a/Melodics/Ukrainian/Arr.hs b/Melodics/Ukrainian/Arr.hs
--- a/Melodics/Ukrainian/Arr.hs
+++ b/Melodics/Ukrainian/Arr.hs
@@ -3,7 +3,7 @@
 
 -- |
 -- Module      :  Melodics.Ukrainian.Arr
--- Copyright   :  (c) OleksandrZhabenko 2019-2021
+-- Copyright   :  (c) OleksandrZhabenko 2019-2022
 -- License     :  MIT
 -- Maintainer  :  olexandr543@yahoo.com
 --
@@ -47,7 +47,7 @@
           closedHdl <- hIsClosed hdl
           if closedHdl
             then do
-                   B.appendFile rs $ unsafeAt dataArray . getBFstLSorted' 0 [(-1,0),(1,1),(2,8),(3,17),(4,23),(5,11),(6,31),
+                   B.appendFile rs $ unsafeAt dataArray . getBFstLSorted' 0 [(1,1),(2,8),(3,17),(4,23),(5,11),(6,31),
                       (7,30),(8,7),(10,9),(15,2),(17,5),(19,32),(21,4),(23,6),(25,10),(27,12),(28,14),(30,15),(32,16),
                         (34,19),(36,3),(38,26),(39,28),(41,29),(43,24),(45,13),(47,18),(49,20),(50,22),(52,25),(54,21),
                           (66,27)] $ u
@@ -62,11 +62,11 @@
 convertToProperUkrainian xs = new2OldRepresentation . convertToProperUkrainianI8 $ xs
   where new2OldRepresentation :: FlowSound -> [String]
         new2OldRepresentation ys = map f $ ys
-          where f = getBFstLSorted' "" [(-1,"-"),(1,"\1072"),(2,"\1077"),(3,"\1086"),(4,"\1091"),(5,"\1080"),(6,"\1110"),
+          where f = getBFstLSorted' "" [(1,"\1072"),(2,"\1077"),(3,"\1086"),(4,"\1091"),(5,"\1080"),(6,"\1110"),
                       (7,"\1100"),(8,"\1076\1079"),(10,"\1078"),(15,"\1073"),(17,"\1076"),(19,"\1169"),(21,"\1075"),
                         (23,"\1076\1078"),(25,"\1079"),(27,"\1081"),(28,"\1083"),(30,"\1084"),(32,"\1085"),(34,"\1088"),
                           (36,"\1074"),(38,"\1094"),(39,"\1095"),(41,"\1096"),(43,"\1092"),(45,"\1082"),(47,"\1087"),
-                            (49,"\1089"),(50,"\1090"),(52,"\1093"),(54,"\1089\1100"),(66,"\1094\1100")]
+                            (49,"\1089"),(50,"\1090"),(52,"\1093"),(54,"\1089\1100"),(66,"\1094\1100"),(101,"-")]
 
 isUkrainian :: Char -> Bool
 isUkrainian = isUkrainianL
diff --git a/mmsyn6ukr-array.cabal b/mmsyn6ukr-array.cabal
--- a/mmsyn6ukr-array.cabal
+++ b/mmsyn6ukr-array.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                mmsyn6ukr-array
-version:             0.3.2.0
+version:             0.3.3.0
 synopsis:            A musical instrument synthesizer or a tool for Ukrainian language listening
 description:         A program can be used as a musical instrument synthesizer or for Ukrainian speech synthesis especially for poets and writers. Uses arrays and .ul RAW sound file formats and SoX inside. Since the 0.2.0.0 version it supports reading from the file and multiline input.
 homepage:            https://hackage.haskell.org/package/mmsyn6ukr-array