declare f : int -> int -> int declare h : (int * int) -> int let f x y = x + y let g x y = x +. y let h (x, y) = x + y let _ = print_int (f 3 2); print_newline () let () = print_int (f 17 42); print_newline () let _ = print_int (h (3, 2)); print_newline () let () = print_int (h (17, 42)); print_newline ()