関数型言語ML (SML, OCaml, etc.), Part 6

[69 デフォルトの名無しさん 2009/06/26(金) 03:32:33]

List.fold_left (fun (x,_) y -> x + y) 0 [(1,1)];;
を通そうとしたところ
This expression has type int but is here used with type int * 'a
といわれてしまいます。うまい方法はないのでしょうか?