mp2i-vms
/
PrettyPrinting
46
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

small oversight

This commit is contained in:
Alexandre 2024-06-04 21:02:16 +02:00
parent 0f2e25bec9
commit 35e9885ccb
4 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
a.out
View File

Binary file not shown.

BIN
graphs.cmi
View File

Binary file not shown.

BIN
graphs.cmo
View File

Binary file not shown.

4
graphs.ml
View File

@ -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 ;;*)