fix
This commit is contained in:
parent
f8e321fd11
commit
fb4de350b5
@ -27,7 +27,7 @@ let croissant t =
|
|||||||
while !i+1 < n && t.(!i) <= t.(!i+1) do
|
while !i+1 < n && t.(!i) <= t.(!i+1) do
|
||||||
i := !i+1
|
i := !i+1
|
||||||
done;
|
done;
|
||||||
!i
|
!i = (n-1)
|
||||||
;;
|
;;
|
||||||
|
|
||||||
(* Exercice 4 *)
|
(* Exercice 4 *)
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user