diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -29,3 +29,7 @@
 
 * Fifth version. Added the possibility to specify an existing file by its absolute path to be used as a source for the sound information for SoX to generate the
 resulting file. Some documentation improvements.
+
+## 0.5.1.0 -- 2020-03-07
+
+* Fifth version revised A. Fixed issue with the order of actions in 'dobutokO2' function.
diff --git a/DobutokO/Sound.hs b/DobutokO/Sound.hs
--- a/DobutokO/Sound.hs
+++ b/DobutokO/Sound.hs
@@ -366,13 +366,13 @@
   exist2 <- doesFileExist file
   case arg1 of
     "1" -> do
-      [_,_,octave,ampLS,time2] <- mapM (recAndProcess file) (if exist2 then [1..5] else 0:[2..5])
+      [_,_,octave,ampLS,time2] <- mapM (recAndProcess file) (if exist2 then [0,2,3,4,5] else [1..5])
       let octave1 = read octave::Int
           ampL = read ampLS::Double
           time3 = read time2::Double
       oberSoXSynthNGen file octave1 ampL time3 (unwords . drop 2 $ args)
     _ -> do
-      [_,_,octave,ampLS,time2,wws] <- mapM (recAndProcess file) (if exist2 then [1..6] else 0:[2..6])
+      [_,_,octave,ampLS,time2,wws] <- mapM (recAndProcess file) (if exist2 then [0,2,3,4,5,6] else [1..6])
       let octave1 = read octave::Int
           ampL = read ampLS::Double
           time3 = read time2::Double
diff --git a/dobutokO2.cabal b/dobutokO2.cabal
--- a/dobutokO2.cabal
+++ b/dobutokO2.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                dobutokO2
-version:             0.5.0.0
+version:             0.5.1.0
 synopsis:            A program and a library to create experimental music from a mono audio and a Ukrainian text
 description:         It can also create a timbre for the notes
 homepage:            https://hackage.haskell.org/package/dobutokO2