谁能想出如何测试这个 OCAML 函数?

Can anyone work out how to test this OCAML function?

我正在完成考试练习卷,但没有答案。 有一系列功能我必须解释它们的作用但有一个我无法解决: fun x -> fun y -> (x y);; 它有以下类型: ('a -> 'b) -> 'a -> 'b 我该怎么办?

试穿尺码:

let () =
  Printf.printf "The ans is: %d" ((fun x -> fun y -> (x y)) (fun x -> x + 10) 4133)