val max_list : int list -> int
val make_list : int -> (unit -> 'a) -> 'a list
val map3 : ('a -> 'b -> 'c -> 'd) -> 'a list -> 'b list -> 'c list -> 'd list


val max_list : int list -> int
val make_list : int -> (unit -> 'a) -> 'a list
val map3 : ('a -> 'b -> 'c -> 'd) -> 'a list -> 'b list -> 'c list -> 'd list

