Fix truncation in Ocaml plumbing rule