Добавил кол-во бит в название

2024-11-19 15:18:21 +03:00
parent b9cf0e7fe3
commit 622224db79
1 changed files with 1 additions and 1 deletions
--- a/lab3/app/Main.hs
+++ b/lab3/app/Main.hs
@@ -22,7 +22,7 @@ main = do
    
    let sourceTextPath = "resources/biography.txt"
    let sourceImagePath = "resources/david.bmp"
-    let encodedImagePath = "tmp/david_" ++ show caesarShift ++ ".bmp"
+    let encodedImagePath = "tmp/david_" ++ show bitsPerByte ++ "_" ++ show caesarShift ++ ".bmp"
    let decodedTextPath = "tmp/biography.txt"

    putStrLn $ "\nЧтение текста из файла \"" ++ sourceTextPath ++ "\""