kcavaill/ocaml_project
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

essai

Browse source
This commit is contained in:
Leonie Gallois 2020-12-06 13:15:37 +01:00
parent ce37433fec
commit a746f65f34
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/FFAlgorithm.ml
View file

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