This commit is contained in:
Leonie Gallois 2020-12-06 13:15:37 +01:00
parent ce37433fec
commit a746f65f34

View file

@ -21,7 +21,7 @@ let get_min_label_from_path (graph : float graph) (path : (id * id) list) =
(
fun acu (id1, id2) ->
let label = ( match find_arc graph id1 id2 with
|None -> 999999999.0
|None -> 999999999
|Some x -> x) in
if label < acu then label else acu
) min path