diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -44,3 +44,7 @@
 
 * Fourth version revised A. Changed the order of the elements in the list in the Languages.UniquenessPeriods.Vector.General.Debug.maximumElByVec function so that 
 being afterwards applied naturally Languages.UniquenessPeriods.Vector.General.Debug.printUniquenessG1List prints elements starting from the maximum one. 
+
+## 0.4.2.0 -- 2020-09-13
+
+* Fourth version revised B. Fixed issue with toFile function in being not written output for the complex second argument. 
diff --git a/Languages/UniquenessPeriods/Vector/General/Debug.hs b/Languages/UniquenessPeriods/Vector/General/Debug.hs
--- a/Languages/UniquenessPeriods/Vector/General/Debug.hs
+++ b/Languages/UniquenessPeriods/Vector/General/Debug.hs
@@ -32,6 +32,7 @@
 ) where
 
 import Data.Print.Info
+import Data.List (intersperse)
 import System.IO
 import qualified Data.Vector as V
 import Languages.UniquenessPeriods.Vector.Auxiliary
@@ -57,18 +58,12 @@
  | otherwise = V.maximumBy (\(_,vN0,_) (_,vN1,_) -> compare (V.unsafeIndex vN0 0) (V.unsafeIndex vN1 0)) . snd . get22 $ y
 {-# INLINE maximumElBy #-}
 
--- | Inspired by appendS16LEFile function from Melodics.Ukrainian module from @mmsyn6ukr@ package.
+-- | Prints every 'String' from the list on the new line to the file. Uses 'appendFile' function inside. 
 toFile :: 
   FilePath -- ^ The 'FilePath' to the file to be written in the 'AppendMode' (actually appended with) the information output.
   -> [String] -- ^ Each 'String' is appended on the new line to the file.
   -> IO ()
-toFile file xss = withFile file AppendMode (\hdl -> do
-    hClose hdl
-    closedHdl <- hIsClosed hdl
-    if closedHdl 
-      then openFile file AppendMode >>= \hdl -> mapM_ (hPutStrLn hdl) xss
-      else error "The handle is not closed!"
-    hClose hdl)
+toFile file xss = (mapM_ (appendFile file) . intersperse newLineEnding $ xss) >> appendFile file newLineEnding
 
 -- | Is used to print output specified to the 'stdout' or to the 'FilePath' specified as the inner argument in the 'Info2' parameter.
 printUniquenessG1 
diff --git a/uniqueness-periods-vector-general.cabal b/uniqueness-periods-vector-general.cabal
--- a/uniqueness-periods-vector-general.cabal
+++ b/uniqueness-periods-vector-general.cabal
@@ -2,7 +2,7 @@
 --   For further documentation, see http://haskell.org/cabal/users-guide/
 
 name:                uniqueness-periods-vector-general
-version:             0.4.1.0
+version:             0.4.2.0
 synopsis:            Generalization of the functionality of the dobutokO-poetry-general-languages package
 description:         Generalization of the functionality of the dobutokO-poetry-general-languages package
 homepage:            https://hackage.haskell.org/package/uniqueness-periods-vector-general
