mirror of
https://github.com/compiler-explorer/compiler-explorer.git
synced 2025-12-27 12:54:00 -05:00
9 lines
158 B
OCaml
9 lines
158 B
OCaml
let max_array array =
|
|
let max = ref 0 in
|
|
for i = 0 to Array.length array do
|
|
let el = array.(i) in
|
|
if el > !max
|
|
then max := el;
|
|
done;
|
|
!max
|