From 35e9885ccb5532906a87c581e9a57c14d47f642a Mon Sep 17 00:00:00 2001
From: Alexandre <cpge.aboujaib@gmail.com>
Date: Tue, 4 Jun 2024 21:02:16 +0200
Subject: [PATCH] small oversight

---
 a.out      | Bin 345727 -> 345727 bytes
 graphs.cmi | Bin 7565 -> 7565 bytes
 graphs.cmo | Bin 82819 -> 82818 bytes
 graphs.ml  |   4 ++--
 4 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/a.out b/a.out
index e44621936e5ecf2b8ddcffc36f04a63dea3c3a7b..3b127e87e6b66d9fc367e96135d8b001f6aeb22e 100755
GIT binary patch
delta 62
zcmez0Bl^Ebw4sHug{g&k3(JAWj9l9fK4y^&V`l(^2iqT7vUYF_Ja^{3Dlprz_P~l8
Q0$jezueVpava&G(0O$S|k^lez

delta 62
zcmez0Bl^Ebw4sHug{g&k3(JAWj4ay^K4y^&W1lq>1XgZ;Xvx~aEwJ?Y&YHLDRqF0G
Rl=}OgG_c)X>B`E+2mp4`8)X0h

diff --git a/graphs.cmi b/graphs.cmi
index 1c7c7541ea7d585fd4bbdf72700660dc5f422a7a..bfe425afa1098ad4617b46125b6e0279e30b5fbf 100644
GIT binary patch
delta 58
zcmeCR?zP@fEg{~^#K3TA;sI6`Uq;q$5F0EoZSy3FO-usMoq4Yc%yz6ju;PXQm#^~c
J%^}j3OaL`@6ZZfB

delta 58
zcmeCR?zP@fEg{~=#K3TA(g9W$Uq;q$5F0Eoee)!VO-uqypYN=ByI!U4ZbPZR?@0sO
J%^}j3OaM}n6?6aq

diff --git a/graphs.cmo b/graphs.cmo
index 1b70909fa3edbdb8a7a76dbd2a88e74d5c0721e6..f0d2f4dea6ef256795866f813651cb3eb777bb88 100644
GIT binary patch
delta 156
zcmZo}XKiX{ZP>zifsK)C`$aa!Wz3xa7#IWv7#Q@-w>NMx%J4EP8|ZCcAkMgiS^Osx
z1H(m&1FWoD7+D*D><eH4yY11^j2l(NLxCcf5)ZHnlrge)fY@Mxtm(=Qj9TLPAc01p
rWD_H6Cx{IeXy2aVz&M>r;JGvJRe{-#wFg$*5a9Avem$MrnXv)@GsG<J

delta 157
zcmZo_XKik0ZP>zifsK)6`$aa!Wz3xa85jfw7#Q>{wl{Dw%J8zN80Z;npD)h1gjxI-
z69dCV%LA;eTNqgzfb0uk0sHMy(u^Bb#KV9hmy!;!3Y0Ojc7WJmf$Zr@4vbpj1t5VY
spkxyxYbS^e7U<ZX?7%pkNnq*ooi%UQtJK|XDE0R}X<$2@%bBqP0C4{<oB#j-

diff --git a/graphs.ml b/graphs.ml
index 22cf481..00f1d6d 100644
--- a/graphs.ml
+++ b/graphs.ml
@@ -1358,7 +1358,7 @@ let another_type_of_dijkstra (gr : type2graph) r d =
         draw_integer (1200-r) (800-r) depth r;
 
         if !done_smth then
-          Unix.sleepf 0.05;
+          Unix.sleepf 0.5;
 
         let node_xy = ((r + (2*r + d)*i), (r + (2*r + d)*j)) in
 
@@ -1416,7 +1416,7 @@ let another_type_of_dijkstra (gr : type2graph) r d =
 open_graph " 1200x800" ;;
 set_window_title "Graphs" ;;
 
-let type2 = generate_type2_graph 7 5 40 1 4 ;;
+let type2 = generate_type2_graph 7 5 40 1 10 ;;
 
 (*another_type_of_graph_printing type2 35 100 true ;;*)
 (*another_type_of_dfs type2 35 75 ;;*)