From af18cc7b28c40e4da1af53e745f172a64c9f8508 Mon Sep 17 00:00:00 2001
From: Arity-T <tish.mainmail@gmail.com>
Date: Sat, 9 Nov 2024 18:52:39 +0300
Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D0=BB=20?=
 =?UTF-8?q?=D0=BF=D0=B0=D1=80=D0=B0=D0=BC=D0=B5=D1=82=D1=80=20=D0=B4=D0=BB?=
 =?UTF-8?q?=D1=8F=20=D1=83=D0=BA=D0=B0=D0=B7=D0=B0=D0=BD=D0=B8=D1=8F=20?=
 =?UTF-8?q?=D1=87=D0=B8=D1=81=D0=BB=D0=B0=20=D1=88=D0=B0=D0=B3=D0=BE=D0=B2?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lab2/draw_fern.ipynb | 3 ++-
 lab2/fern.hs         | 7 +++++--
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/lab2/draw_fern.ipynb b/lab2/draw_fern.ipynb
index 13a99cc..35fde18 100644
--- a/lab2/draw_fern.ipynb
+++ b/lab2/draw_fern.ipynb
@@ -16,8 +16,9 @@
    "outputs": [],
    "source": [
     "with open('test.txt', 'r', encoding='utf-16') as file:\n",
-    "    data_str = file.read()\n",
+    "    lines = file.readlines()\n",
     "\n",
+    "data_str = ''.join(lines[1:])\n",
     "x, y = list(zip(*eval(data_str)))"
    ]
   },
diff --git a/lab2/fern.hs b/lab2/fern.hs
index e770f83..60308b7 100644
--- a/lab2/fern.hs
+++ b/lab2/fern.hs
@@ -35,5 +35,8 @@ barnsleyFern start n = do
 
 main :: IO ()
 main = do
-  fractal <- barnsleyFern (0, 0) 1000
-  print fractal
+  putStrLn "Укажите количество шагов рекурсии:"
+  input <- getLine
+  let n = read input :: Int
+  fractal <- barnsleyFern (0, 0) n
+  print fractal
\ No newline at end of file