let
sum_int =
List
.fold_left ~f:(+) ~init:0