Есть ли способ получить автоформатер для сохранения стиля монадического кода?

Question

Для кода OCaml в монадическом стиле, подобного следующему:

let program =
    let ( >>= ) m f = bind m f in
    get >>= fun s ->
    put (s + 1) >>= fun _ ->
    get >>= fun x ->
    return (x + 3)

Есть ли способ получить средство форматирования кода, чтобы сохранить стиль сохранения fun s справа?

Когда я использую ocamlformat, он делает это:

let program =
    let ( >>= ) m f = bind m f in
    get >>= fun s -> put (s + 1) >>= fun _ -> get >>= fun x -> return (x + 3)

операторы привязки будет выглядеть намного лучше, чем >>=, но я пока не могу их использовать.