在OCaml中打印元組

Question

我想打印int * int類型的方法的結果。

我想是這樣的：

printf "%d %d\n" (find (99, 10));; 

但是，我越來越：

Error: This expression has type int * int 
     but an expression was expected of type int 

我看着這裏http://caml.inria.fr/pub/docs/manual-ocaml/libref/Printf.html但是沒有元組的提及。

那麼打印元組的正確方法是什麼？

Answer 1

可以detuple它，例如，

let (x,y) = find (99,10) in 
printf "%d %d\n" x y 

或者，你可以定義一個元組打印機，例如，

let pp_int_pair ppf (x,y) = 
    fprintf ppf "(%d,%d)" x y 

，然後用%a符使用，例如，

printf "%a\n" pp_int_pair (find (99,10))