在这段代码中:
let rec write_from_exactly out s offs len =
Lwt_unix.write out s offs len >>= fun n ->
if n = len then Lwt.return ()
else write_from_exactly out s (offs + n) (len - n)
in ...
虽然我可以或多或少地猜测它的作用,但我找不到任何关于“>> = ”的含义以及它是如何工作的官方定义。